var a: integer; b: real; c: string;begin readln(a, b, c); writeln('Целое число: ', a, ' Действительное чило: ', b, ' Строка: ', c);end.
var
a: integer;
b: real;
c: string;
begin
readln(a, b, c);
writeln('Целое число: ', a, ' Действительное чило: ', b, ' Строка: ', c);
end.