Задача 8 Урок 5

Вам нужно получить от пользователя
два вещественных числа и ещё два целых,
запишите все эти 4 значения в переменные
и выведете значения
переменных на экран, чтобы было ясно
значение какой переменной чему равно.

var
    a, b: real; 
    c, d: integer;
begin
    writeln ('dany peremeppye a: real; b: real; c: int; d: int');
    writeln ('vvedite 4 chisla');
    readln (a, b, c, d);
    writeln ('a = ', a,' ', 'b = ', b,' ', 'c = ', c,' ', 'd = ', d);
end.