Регистрация
qwerty882
25.09.2021 11:19
Информатика
Есть ответ 👍

Написать программу на языке pascal определить сумму чисел вводимых с клавиатуры, причем только тех, которые кратны 5 и не кратны 2 повторюсь, программу на pascal

204
329
Посмотреть ответы 2

Ответы на вопрос:

Marina12971
Marina12971
4,4(16 оценок)
Var n,a,s,i: integer; begin write('количество чисел = '); readln(n); writeln(n,' чисел: '); s: =0; for i: =1 to n do   begin   readln(a);   if (a mod 5=0)and(a mod 2< > 0) then s: =s+a;   end; writeln('s = ',s); end. пример: количество чисел = 10 10 чисел: 18 40 25 43 61 45 30 54 37 15 s = 85
бобикбарбос
бобикбарбос
4,4(76 оценок)
Орёл - зрение, волк обоняние, летучая мышь - слух, крот - осязание.

Популярно: Информатика