Написать алгоритм нахождение суммы от 1 до 5 с помощью цикла
Написать алгоритм нахождение суммы от 1 до 5 с помощью цикла
Гость
Ответ(ы) на вопрос:
Гостьvar a,i:integer;
begin
a:=0;
for i:1 to 5 do begin
a:=a+i;
end;
write(a);
end.
Не нашли ответ?
Похожие вопросы