Ввести с клавиатуры 2 числа в интервале от 0 до 999. Вывести их на экран столбиком в виде, удобном для сложения или умножения. То есть первый разряд первого числа под первым разрядом второго числа, второй разряд - под вторым и т. д.

program zz1;

var a, b:integer; / / вводим переменные целого типа

begin

write (' введите первое число в интервале от 0 до 999'); / / вводим с клавиатуры первое число

read (a);

write (' введите второе число в интервале от 0 до 999'); / / вводим с клавиатуры второе число

read (b);

writeln (a:5); / / выводим первый ответ

write (b:5); / / выводим второй ответ

end.