Ввести рост человека. вывести на экран " высокий", если его рост превышает 180 см, и " не очень высокий" в противном случае.
Program rost;
var a: integer;
begin
readln (a);
if a<=180 then
Writeln(Не очень высокий)
else
Writeln(Высокий);
end.
Оцени ответ
