Напишите программу, которая в последовательности целых чисел определяет их сумму и количество четных чисел, кратных 5. программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается число 0(0-признак окончания ввода, не входит в последовательность , , на паскале
159
434
Ответы на вопрос:
Program mas; var i,k,sum: integer; a: array [1..1000] of integer; beginfor i: =1 to 1000 dobegin; readln(a[i]); if a[i]=0 then break; end; k: =0; sum: =0; for i: =1 to 1000 dobegin; sum: =sum+a[i]; if (a[i] mod 2=0) and (a[i] mod 5=0) and (a[i]< > 0) thenk: =k+1; end; writeln('summa= ',sum); writeln('kolichestvo=',k); readln; end.
К мультипарадигмальному
Объяснение:
Мультипарадигма́льный язы́к программи́рования — как правило, язык программирования, который был разработан специально как инструмент мультипарадигмального программирования, то есть изобразительные возможности которого изначально предполагалось унаследовать от нескольких, чаще всего не родственных языков.
Популярно: Информатика
-
Robchik13.12.2022 12:35
-
Aniri150102.12.2021 20:23
-
kristinanester199728.07.2021 12:55
-
исма1922.02.2020 04:17
-
anlevytska21.02.2022 05:55
-
весна3714.03.2021 02:13
-
Серыйпрайм19.08.2020 09:33
-
AliseNikylina08.04.2021 04:47
-
BotanicPanik25.02.2023 16:41
-
Тжвик30.09.2020 02:29