Program one;
var x,y,z: integer;
begin
write('x, y, z: ');
readln(x,y,z);
writeln('Для ',x,'-летнего возраста');
writeln('рост ',y,' см и вес ',z,' кг очень подходят');
end.
Пример:
x, y, z:
16 159 50
Для 16-летнего возраста
рост 159 см и вес 50 кг очень подходят