Question

Выполните программу и ответьте на следующие вопросы
Program Demo1;
Var F,N:real;
Begin N:=5;
While N<=6 do
Begin F:=sqr(N)+sqrt(N)/(N-24);
Writeln(F:7:4);
N:=N+0.1;
End;
End.
1. Сколько раз выполнился цикл?
2. Чему равно первое и последнее значение аргумента и какой результат им соответствует?
3. Укажите результат соответствующий пятому и десятому значению

Answer 1

Ответ:

1) 11

2) Первое: 24.8823

Последнее: 35.8639

3) Пятое: 29.0351

Десятое: 34.6758