Я так понимаю, ты пишешь программу, которая говорит, сколько тебе лет)) Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:
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.
1. Даны числа 8141, 3615, 4833, 3240.Выберите те из них, которые делятся: а) на 3 ===3615, 4833, 3240 б) на 5 === 3615, 3240 в) на 9===4833,3240
2. Используя признаки делимости, сократите дробь: а)222/258=111/129 ; б)380/620=38/62=19/31
3. Имеется 18 карандашей, 36 ручек и 5 блокнотов. Можно ли из них сделать 9 одинаковых наборов? нет, т.к. 5ти блокнотов не хватит на 9 наборов
4О. Найдите частное: 15xy : (5x)=3ху:х=3у
5О. В двух кабинетах было 68 стульев. После того как из одного кабинета в другой перенесли 9 стульев, в первом кабинете стульев оказалось в 3 раза меньше, чем во втором. Сколько стульев было в каждом кабинете первоначально? система уравнений х- кол-во в 1й комнате, у- во 2й х+у=68 у+9=3(х-9)
