Есть ответ 👍

Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, кратных 4. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 4. количество чисел не превышает 1000. введённые числа не превышают 30 000. программа должна вывести одно число – количество чисел, кратных 4.

206
260
Посмотреть ответы 3

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

mirst14
4,8(46 оценок)

clsa: input nif n < 1 or int(n) < > n or n > 1000 then goto adim a(n)for i = 1 to nb: input a(n)if a(n) < 1 or int(a(n)) < > a(n) or a(n) > 30000 then goto bif int (a(n) / 4) = a(n) / 4 then z = z + 1next iprint zend


это программа из гиа..

 

var a,b : integer; beginreadln (a); b: =0; while a< > 0 do beginif (a mod 4 = 0) thenb: = b+1; readln (a); end; write (b); end.


ячейка e2:

e2=c2*d2

ячейка c7:

c7=сумм(c2: c6)

или

c7=с2+с3+с4+с5+с6

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