определите значение переменной s после выполнения фрагмента программы
s := 0;
x := 2019;
while x > 0 do begin
x := x - 1;
s := s + 1;
end;
Ответы
Ответ дал:
0
program pr11;
var
s,x:real;
begin
s := 0;
x := 2019;
while x > 0 do begin
x := x - 1;
s := s + 1;
end;
write('S= ',s);
End.
Протокол:
S=2019
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад