Код программы

USES CRT;

var

R:real;

I,I2:integer;

C,C2:char;

begin

TextBackGround(1);

CLRSCR;

TextColor(8);

writeln('This is program input and output...');

TextColor(20);

writeln('Press "ENTER" to continue...');

readln;

TextColor(9);

writeln('Enter to REAL');

readln(R);

writeln('Enter to INTEGER');

readln(I);

writeln('Enter to CHAR');

readln(C);

writeln('Enter to INTEGER-2');

readln(I2);

writeln('Enter to CHAR-2');

readln(C2);

TextColor(3);

writeln('--------------------------------------------------------------------------------');

writeln('You Entered is REAL - ',R, 'INTEGER - ',I, 'CHAR - ',C, 'INTEGER2 - ',I2, 'CHAR2 - ',C2);

writeln('--------------------------------------------------------------------------------');

TextColor(9);

writeln('-');

TextColor(4);

writeln('Press "ENTER" to output result');

TextColor(9);

writeln('-');

readln;

TextColor(5);

writeln('--------------------------------------------------------------------------------');

TextColor(6);

writeln('Output entered INTEGER - ',I:4);

writeln('Output entered INTEGER - ',I:5);

writeln('Output entered INTEGER - ',I:6);

writeln('Output entered INTEGER2 - ',I2:4);

writeln('Output entered INTEGER2 - ',I2:5);

writeln('Output entered INTEGER2 - ',I2:6);

writeln('Output entered CHAR - ',C:4);

writeln('Output entered CHAR - ',C:5);

writeln('Output entered CHAR - ',C:6);

writeln('Output entered CHAR2 - ',C2:4);

writeln('Output entered CHAR2 - ',C2:5);

writeln('Output entered CHAR2 - ',C2:6);

writeln('Output entered REAL - ',R:4:2);

writeln('Output entered REAL - ',R:5:4);

writeln('Output entered REAL - ',R:6:3);

TextColor(5);

writeln('---------------------------------------------------------------------------------');

TextColor(20);

writeln('Press "ENTER" to be EXIT!');

TextColor(5);

writeln('-');

readln;

CLRSCR;

END.

Инструкция пользователя

Данная программа предназначена для ввода значения переменных по шаблону R I C I C и вывода их по другому шаблону I I C C R с тремя различными полями M: 4, 5, 6 и N: 2, 4, 3.

Для того, чтобы использовать программу, нужно запустить файл с именем LAB-5.exe и ввести по очереди значения переменных: сначала переменную типа «REAL», потом «INTEGER», далее «CHAR», затем снова «INTEGER», и опять «CHAR». После этого на экране появится информация о введённом значении каждой переменной.

Затем следует нажать на клавишу «ENTER». После чего введённые переменные будут выведены по следующему шаблону с тремя различными полями(M: 4, 5, 6 и N: 2, 4, 3): «INTEGER», «INTEGER», «CHAR», «CHAR», «REAL».

Инструкц и я программиста

В таблице 1 показано, какие структуры данных используются в программе.

Таблица 1 – Структуры данных, используемых в программе

Имя	Тип	Назначение
R	Real	Значение 1-ой переменной
I	Integer	Значение 2-ой переменной
C	Char	Значение 3-ей переменной
I2	Integer	Значение 4-ой переменной
C2	Char	Значение 5-ой переменной