Информатика, опубликовано 20.02.2020 19:01
Составьте алгоритм вычисления суммы всех натуральных чисел,не превышающих заданного натурального числа n с а не for в Pascal Abc.net
Ответы
Ответ оставил: Гость
program summa;
var sum, i, n:LongInt;
begin
ReadLn(n);
i:=1;
sum := 0;
while (i<=n) do
begin
sum:=sum+i;
i:=i+1;
end;
WriteLn(sum);
end.
Ответ оставил: Гость
Иппррмпаноиаенримииитттиаалиштп5в3агтОтвет оставил: Гость
Процессор, сетевая карта, оперативная память, видеокарта, блок питания, дисковод, ПЗУОтвет оставил: Гость
Коллаж можно скачать такой:Laougt
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
