Запишите, что получится в результате работы данной программы PROGRAM PRIMER; VAR X, Y:REAL; BEGIN FOR X:=1 TO 11 DO BEGIN Y:=X*X*X; WRITE (‘ОТВЕТ ЗАДАЧИ’), Y; X:=X+1; END; END.

Выведет 11 действительных чисел, это будет Y (который равен x*x*x)

В консоле выведет:

"Отв. задачи" 1

"Отв. задачи" 8

"Отв. задачи" 27

"Отв. задачи" 4*4*4

...

и в конце

"Отв. задачи" 11*11*11

часть схемы, информацию - канал.

на паскале:

program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.