Ответы на вопрос:
Const n=20; var sum: integer; i: byte; begin sum: =0; i: =1; repeat sum : = sum + i; i : = i+1; until (i=n); end.
Популярно: Информатика
-
Аня1202200615.03.2021 00:02
-
JackDead17.09.2022 22:54
-
zhenyazhitenko25.09.2022 07:43
-
sveta7up24.06.2020 12:27
-
Nastenka000315.09.2021 15:28
-
ogurtsov200112.05.2021 03:11
-
ВерочкаЛатушкина16.05.2020 10:31
-
vovan2002vovap0181f06.05.2022 18:30
-
stanislavfred21.03.2022 07:29
-
kroshkaPo07.07.2020 11:08