Составить программу, которая находит произведение всех натуральных чисел от 1 до 4 (для приложения паскаль)
131
468
Ответы на вопрос:
Program chik3; const n=50; var a,b: array[1..30]of real; i: integer; p: real; beginp: =1; for i: =1 to n dobeginread(a[i]); if(a[i]< =2)then p: =p*a[i]; end; writeln(p); end.
Популярно: Информатика
-
alisheralisher202.12.2020 13:50
-
st1nk1n1p09.03.2021 19:07
-
dasharau2728.01.2020 08:34
-
D20209.10.2022 22:02
-
хранитель719.05.2022 13:51
-
ayazhan10yearsold15.02.2022 10:04
-
qqruzko15.05.2021 17:26
-
Dashka696901.05.2023 06:59
-
diasdias200017.01.2023 17:08
-
ИльяФин11.05.2022 00:22