Найти сумму 10 натуральных чисел (использовать цикл while).

samikzaki samikzaki    3   20.07.2019 15:40    0

Ответы
amid2003 amid2003  03.10.2020 08:59
Var y,i:integer;
begin
while i<=10 do
begin
y:=y+i;
i:=i+1;
end;
Write(y);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика