Есть ответ 👍


что за устройство спряталось в ребусе?

243
329
Посмотреть ответы 3

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


ответ:

принтер

объяснение:

прин ц - ц убираем

ве   тер - ве убираем

принтер


ответ:

принтер

объяснение:

прин(ц) (ві)тер => прин + тер


  решение на free pascal ide  2.6.0

var s: array[1..15] of integer; k,max,arf: integer; begin max: =0; for k: =1 to 15 doread(s[k]); for k: =1 to 5 doif s[k]> max then max: =s[k]; for k: =7 to 15 doarf: =arf+k; arf: =round(arf/9); for k: =1 to 15 doif s[k]> arf then s[k]: =max; for k: =1 to 15 dowriteln('s[',k,']= ',s[k]); writeln('srednee arifmeticheskoe = ',arf); writeln('max = ',max); readln; readln; end.c

 

 

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