1.напишите программу,определяющую сумму s=1+2+3++99 2.напишите программу,определяющую произведение p=1*2*3**10 на паскаль за ранее
254
476
Ответы на вопрос:
Var i,s: integer; begin s: =0; for i: =1 to 99 do s: =s+i; writeln('s=',s) end. var i: integer; p: longint; begin p: =1; for i: =1 to 10 do p: =p*i; writeln('p=',p) end.
Популярно: Информатика
-
dasha246813528.05.2022 09:01
-
LeНин14.09.2021 00:07
-
olenapolova409.03.2021 21:08
-
Alina098904.04.2023 14:17
-
румия240812.09.2020 14:17
-
AlisaSkun318.01.2021 21:43
-
wwwghg02.12.2020 10:59
-
vhbhvgh01.11.2020 07:43
-
leo0000014.01.2022 20:20
-
danpro309.01.2020 04:02