Program Scalar_Input (Input, Output);
Var
XInt: Integer;
XReal : Real;
Begin
WriteLn ('PASCAL: Программа ввода скалярных величин.');
Write ('Введите целое число: ');
ReadLn (XInt);
Write ('Введите вещественное число: ');
ReadLn (XReal);
Writeln;
Writeln('Ввод окончен.');
Writeln('Были введены следующие числа:');
Writeln('XInt= ', XInt:12);
Writeln('XReal = ', XReal:12:3);
ReadLn;
End.