Вычислить и напечатать y=x^2-15*(COS(x)),для х=15,19,23,27,31,… — QBasic(Бейсик)

x = 15
FOR i = 1 TO 13
    y = x ^ 2 - 15 * (COS(x))
    PRINT "x="; x; " y="; y
    x = x + 4
NEXT

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment