Регистрация
222111ALEXA111222
10.10.2021 21:49
Информатика
Есть ответ 👍

Пропускная канала связи 512 байт/сек За какое время будет передано 300 Кбайт информации? Зарание

286
385
Посмотреть ответы 1

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

АлинкаГал
АлинкаГал
4,4(67 оценок)
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.

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