Введите с клавиатуры значение возраста а. выведите на экран следующие сообщение: "вы-ребёнок"- если а< 6; "вы-студент"- если 17 "вам пора-работать"- если а> 25
(Pascal) program KW_V; uses CRT; var a:integer; begin readln(a); if a<6 then writeln('Вы-ребёнок'); if a=17 then writeln('Вы-студент'); if a>25 then writeln('Вам пора работать'); end.
program KW_V;
uses CRT;
var a:integer;
begin
readln(a);
if a<6 then
writeln('Вы-ребёнок');
if a=17 then
writeln('Вы-студент');
if a>25 then
writeln('Вам пора работать');
end.