Ответы на вопрос:
Var i,s: integer; begin for i: =10 to 99 do s: =s+i; writeln (s); end. ну или var i,s: integer; begin i: =10; while i< 100 do begin s: =s+i; i: =i+1; end; writeln (s); end.
Популярно: Информатика
-
Liza11133323.01.2021 03:20
-
nini852330.06.2020 00:34
-
розоваяпринцесса20.05.2023 18:52
-
Ira01928.04.2023 22:47
-
oleh0915610.06.2020 08:13
-
kapitan200119.02.2023 07:49
-
LedyKoshka05.11.2021 17:44
-
dominika615.01.2020 08:41
-
знайка20814.03.2020 14:36
-
никита15485602.12.2021 09:54