Регистрация
Redob
14.09.2021 20:16
Информатика
Есть ответ 👍

Дано n чисел. найти количество кратных 10

133
381
Посмотреть ответы 2

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

mila2086
mila2086
4,6(6 оценок)
Var a,  n, k: integer; begin write('количество чисел - ');   readln(n); k: =0; for var i: =1 to n do  begin  read(a);   if (a mod 10 =0) then k: =k+1;   end; writeln(k); end. 
Babikovandrei48
Babikovandrei48
4,8(88 оценок)
В  первом случае 66 символов по 16 бит каждый = 1056 бит. во втором   нужно перемножать с конца 16*64=1024бита,   1024*35=35840 бит,     35840*16=573440бит

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