Решение задачи №9 из главы 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);
d:=a + b + c;
writeln('Summa: a + b + c = ', d);//Выводим сумму вещественного числа и целых чисел
readln();
end.