Что будет выведено на экране монитора после выполнения следующего фрагмента программы: b:=0; while a<>0 do begin a:=a div 10; h:=b*10+a mod 10; end; write(h); если а=13305?
Ответ:1330
Объяснение: Ну смотри B присваеваем ноль;
Делаем цикл если А не равно 0 тогда делим a на 10; Прошу заметить тип int;
далее h равно b * 10 "(0 на 10 равно 0)" + a делим без остатка на 10;
конец;
вывод h