ответить на во письменно в тетради:
1) Сколько граней, боковых ребер у n-угольной пирамиды?
2) Какое наименьшее число граней может иметь пирамида?
3) Можно ли в пирамиде провести диагональ?
Решить задачи:
4) Высота пирамиды равна 3 см. Чему равно расстояние от вершины пирамиды до плоскости основания?
5). Боковые ребра треугольной пирамиды равны 7, 12 и 15 см. Одно из них перпендикулярно к плоскости основания. Чему равна высота пирамиды?

Я так понимаю, ты пишешь программу, которая говорит, сколько тебе лет))
Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:

Program Vozrast;
var i: integer;
begin
writln ('Введите возраст: ');
readln(i);
if (i < 1) or (i > 150) then
  writeln ('Это туфта, насяльника!');
if (i <> 11) and (i mod 10 = 1) then
  writeln (i, 'год');
if ((i<10) or (i>20)) and ((i mod 10 = 2) or (i mod 10 = 3) or (i mod 10 = 4) then
 writeln (i, 'года');
if ((i  > 9) and (i < 21)) or ((i mod 10 = 5) or (i mod 10 = 6) or (i mod 10 = 7) or (i mod 10 = 8) or (i mod 10 = 9) or (i mod 10 = 0)) then
  Writeln (i, 'лет');
end.

Должно сработать))

Я хз честно

Пошаговое объяснение:

Я хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честноЯ хз честно