Решение задачи №7

Решение задачи №7 из главы 4

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

var
   a, b :integer;
   c, d: real;
begin
   writeln('vvedite celoe chislo :');
   readln(a);
   writeln('vvedite celoe chislo :');
   readln(b);
   writeln('vvedite vechestvennoe chislo :');
   readln(c);
   writeln('vvedite vechestvennoe chislo :');
   readln(d);
   writeln('Otvet: a=', a, '  b=', b, ' c=', c, ' d=',d);
   readln();
end.