Дан массив целых чисел B(40). Составить программу для вычисления количества элементов массива, которые кратны 5 .
181
274
Ответы на вопрос:
Program whilepaskal; var b, a: integer; sum: real; beginreadln(a); b: =1; sum: = 0; while (b< =a) dobeginsum : = sum+1/sin(b); b: =b+1; end; writeln(sum); end.
Популярно: Информатика
-
Sanyaiftkfjycycyccy13.06.2023 20:06
-
Сабри111106.06.2022 13:56
-
asiraz0312.07.2020 07:31
-
LI100K01.09.2021 02:10
-
katyusha001.04.2023 09:47
-
daniyal67310.01.2021 04:43
-
12312332432222127.05.2023 09:26
-
АнимешникИз2К1708.12.2022 15:10
-
Умницв16.01.2020 18:11
-
aushatsy29.05.2020 18:54