Составит программу нахождения суммы натуральных чисел от 1-100

Даша333555 Даша333555    2   26.05.2019 11:40    0

Ответы
MstyanKristina MstyanKristina  22.06.2020 21:53
Var
  i, sum : integer;
begin
  sum := 0;
  for i := 1 to 100 do sum := sum + i;
  writeln (sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика