8. Как будет выполняться фрагмент кода, с форматом вещественных чисел ?
x:=0.01
Пока x не равно 1.00
Вывод(x)
x:=x+0.01
Конец цикла

Ответы

Ответ дал: nkpk
0
var
 x:real;
begin
 x:=0,01;
while x<>100 do
begin
writeln(x);
x:=x+0,01;
end;
end.
ну выходит так что пока x < 100 выполняется цикл и операторы которые находятся в цикле 

Вас заинтересует