Begin writeln ('umbrella'); writeln ('выучи слово! ') end. на экране данные выведены следующим образом: 1)umbrella выучи слово! 2)выучи слово! 3)umbrella выучи слово! 4)umbrella

ответ: 1) umbrella

                выучи слово!

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.

одновременно нажать alt и 3 (на цифровой клавиатуре с права)

♥