РЕШИТЬ В ПРОГРАММЕ ПАСКАЛЬ
Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 5. Программа получает на вход количество чисел в
последовательности, а затем сами числа. В последовательности всегда имеется
число, кратное 5
trenter
2
08.05.2020 13:02
1
Другие вопросы по теме Информатика
tyulegenevapolina
12.05.2020 17:19
МарвиСК
09.09.2019 12:30
Mika123123
27.10.2020 12:38
Erumbumbum
18.12.2020 10:02
тараканеше
18.12.2020 10:04
serg6205
22.01.2021 17:03
vladosik6448
22.01.2021 17:04
YummyGirl
02.10.2019 02:30
Аня98788
02.10.2019 02:30
23452345torer
02.10.2019 02:30
Популярные вопросы
- Почему Африканцы были не развитыми Хотя Египет был очагом развития...
3 - Проанализируйте развитие одного из государств (Великобритания, Франция,...
1 - Решение не отступать вновь вернуло в глазах Пантелея Прокофьевича...
2 - 3x^2-2x вынеси x за скобки...
1 - пожплуста скореє вопрос на фотот...
2 - Установите соответствие между названиями инструментов и их пиктограмм...
2 - Знайдіть координати вектора п, по колінеарний векто рy t (3; -1),...
2 - Аққұтан сөзіне Біріккен сөйлем құрау...
2 - Если Аня купит 6 тетрадей, то у неё останется 5 центов. А если она...
2 - решить задачу нужен ответ по математике...
1
Объяснение:
var n,i,a,s:integer;
begin
write('n = ');
readln(n);
s:=0;
writeln('Введите ',n,' чисел:');
for i:=1 to n do
begin
read(a);
if a mod 5 = 0 then s:=s+a;
end;
writeln('s = ',s);
end.
Пример:
n = 6
Введите 6 чисел:
12 45 84 37 10 51
s = 55