Ответы
Ответ дал:
1
Ответ:
program test;
var a,s:integer;
begin
a:=1;
s:=0;
while a<=5 do
begin
s:=s+a;
a:=a+1
end;
write(s)
end.
15
Объяснение:
while условие do тело цикла
Цикл с предусловием (пока) выполняется если условие истинно
Приложения:
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад