Информа́ция (от лат. informātiō — «разъяснение, представление, понятие о чём-либо», от лат. informare — «придавать вид, форму, обучать; мыслить, воображать») — сведения независимо от формы их представления.
Спасибо
Ответ дал: Гость
program xxx; var a, b, min : integer; begin write('введите число а=');
readln(a);
min: =10; while a < > 0 do begin b: = a mod 10; if b < min then min: =b; a: = a div 10 end; writeln('минимальная цифра = ', min); readlnend.
Популярные вопросы