Даны векторы е1, е2, е3, е4 образующие ортогональный базис. Найти угол между векторами х и у если х=е1-2е2+е3+е4, у=е2+2е3-е4. |е2|=2, |е3|=1, |е4|=2

С решением. Много балов

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

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.

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

Представь, тебе оторвало ногу от взрыва водородной бомбы. Ты весь в слезах катаешься по земле, вокруг ад. Все в дыму, крики раненых, оторванные конечности, кровью залита вся земля. И тут ты смотришь на свою ногу, чувство боли приходит не сразу, но когда ты видишь, что с твоей ногой, тогда начинается дикая паника. Ты начинаешь мотать головой туда-сюда в поисках а тем временем из твоей ноги хлещет кровь. Ты натыкаешься на солдата бьющегося в агонии и кричащего:"Абу Абу!". Тебя начинает пронизать дикий ужас и страх. Ты пытаешься выжить, но все тщетно. Возможно тебя но не надейся на лучшее. Ты должен всегда понимать, что худшее случается чаще, чем лучшее.