Ответы на вопрос:
1) program n1; var n,sum,i: integer; begin readln(n); sum: =0; for i: =2 to n do if i mod 2=0 then sum: =sum+i; write(sum); end. 2) program n2; var i,sum: integer; begin sum: =0; for i: =10 to 99 do sum: =sum+i; write(sum); end.
Популярно: Информатика
-
danisimokuvshn02.12.2022 21:32
-
Pyfkein04.10.2021 04:48
-
Kniga400124.09.2021 20:46
-
LeraCat228806.02.2023 14:49
-
Game777World07.06.2020 03:55
-
Карик00703.12.2021 12:29
-
viktoiabekkknuv09.09.2020 21:17
-
khairullina0508.06.2021 05:37
-
ЭлькаКотикучитсяна503.08.2022 07:38
-
vikapinigina22.01.2020 10:56