Переменная Х <span>будет принимать значение 17.</span>
Какое задание? пару ответов есть
Program vozrast;
var n: integer;
begin
writeln ('Введите возраст');
readln (n);
if (n=1) or (n mod 10 = 1) then writeln ('Мне ',n,' год')
else if (n>1) and (n<5) or (n mod 10 = 2) or (n mod 10 = 3) or (n mod 10 = 4) then writeln ('Мне ',n,' года')
else writeln ('Мне ',n, ' лет');
end.
Я хочу чтоб школа была стеклянной, а планшеты место тетрадей.