Информатика.Оставить программы задач.

Kakakkakaka Kakakkakaka    3   25.04.2020 18:35    0

Ответы
Рита0Венес Рита0Венес  13.10.2020 21:15

Задача 1 ( ответ 5050)

program Hello;

var i, sum : Integer;

begin

for i := 1 to 100 do sum := sum + i;

writeln(sum);

end.

Задача 2 (ответ 105)

program Hello;

var i, sum : Integer;

begin

for i := 1 to 14 do sum := sum + i;

writeln(sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика