Есть ответ 👍

От 1. Сколько времени рекомендуется проводить за компьютером?
2. На каком расстоянии должен находиться экран монитора?
8. Какие правила техники безопасности необходимо соблюдать
при работе за компьютером?
4. Какую первую нужно оказать при электрическом ожоге? ​

299
366
Посмотреть ответы 1

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


Var     a: longint;     min: byte; begin min: =9; write('введите целое число: '); readln(a); a: =abs(a); while a > 0 do     begin     if a mod 10 < min then min: =a mod 10;     a: =a div 10;     end; writeln('min = ',min); end.

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