Ответы на вопрос:
var sum,i: integer;
begin
sum: =0;
for i: =100 to 500 do
sum: =sum+i;
writeln (i);
end.
Популярно: Информатика
-
deniscv080808.06.2020 22:57
-
DmitriyGromov16.01.2023 21:09
-
Daeshka8817.01.2021 20:22
-
asatuchina150212.10.2021 21:57
-
yana0111112.09.2022 22:30
-
Зачемжежить11.10.2021 04:01
-
66Egor9911.02.2022 02:36
-
агамтасия07.10.2021 06:27
-
Alisa1122112227.11.2020 00:06
-
SaDuLLla29.11.2021 18:08