Предмет: Информатика,
автор: Adadadaf
1 задание помогите
Приложения:
![](https://files.topotvet.com/i/881/881657ccc5b19a8b997158e52f802dd2.jpg)
Ответы
Автор ответа:
0
Ответ:
var
i, sum:integer;
begin
sum := 0;
for i := 1 to 100 do
sum := sum + i;
write(sum);
end.
Похожие вопросы
Предмет: Русский язык,
автор: canela
Предмет: Русский язык,
автор: AlenaShooc
Предмет: Русский язык,
автор: 3366777
Предмет: История,
автор: Erke308854
Предмет: Алгебра,
автор: Stena1661