Составьте алгоритм вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа n. с постусловием (for ещ4 не изучали).

oksa4va oksa4va    3   15.09.2019 10:20    1

Ответы
Румия2403 Румия2403  07.10.2020 16:52
Const n=20;
var sum:integer;
       i:byte;

begin
sum:=0;
i:=1;
repeat
   sum := sum + i;
   i := i+1;

until (i=n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика