Регистрация
ivchencov767
23.07.2020 12:25
Информатика
Есть ответ 👍

6. Перечислите все схематические устройства 3D-принтера: 6.1
6.2
6.3
6.4
6.5

это СОР ( если получится можно с книги :) ) заранее

232
425
Посмотреть ответы 1

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

PaPaDeDa
PaPaDeDa
4,8(19 оценок)

var

 size, num, counter, i: integer;

 

begin

 counter := 0;

 read(size);

 for i := 1 to size do

 begin

   read(num);

   if num mod 3 = 0 then

     counter := counter + 1

 end;

 writeln(counter);

end.

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