Ответы на вопрос:
A) var s, i, n : integer; begin s: =0; readln(n); for i: = 1 to n do s: =s+i; writeln(s); end. б) var s, i, n : integer; begin s: =0; readln(n); for i: = 1 to n do s: =s+(i*i); writeln(s); end. в) var s, i, n : integer; begin s: =0; readln(n); for i: = 1 to n do begin if (i mod 2 = 0) then s: =s+i; end; writeln(s); end. г) var s, i : integer; begin s: =0; for i: = 10 to 99 do s: =s+i; writeln(s); end.
Популярно: Информатика
-
bedniyboyarin19.01.2022 06:09
-
regenko119.04.2022 15:03
-
яестьумник27.11.2022 17:11
-
nastyaorinozl1jy04.03.2023 13:42
-
Arisha254404.11.2020 23:51
-
Marina5254709.12.2020 16:09
-
Зина1111111125.01.2022 06:10
-
g8954654635424515.04.2023 19:03
-
heybibl21120.02.2022 02:33
-
ivanovapolina8611.06.2020 03:35