Регистрация
aydawgva
03.10.2022 21:27
Информатика
Есть ответ 👍

Паскаль
среди 8 чисел, введённых с клавиатуры, выписать кратные a

155
352
Посмотреть ответы 2

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

sanekakot
sanekakot
4,8(46 оценок)
Const n=8;
var
b: array[1..n] of integer;
a,i: integer;
begin
readln(a);
for i: =1 to n do readln(b[i]);
for i: =1 to n do if b[i] mod a=0 then writeln(b[i]);
end.

если нужно без массива, напишите
aleksandrafrolo1
aleksandrafrolo1
4,4(31 оценок)

9 кбатй = 73728 бит

73728/1536=48сек

1024*48=49152бит=6164 байт ( 1 байт = 8 бит)

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