1.Раскройте скобки в записанном выражении а – (b – 1,7); 2. Раскройте скобки в записанном выражении x + ( - y - 7);
3.Запишите выражение а – 4 + х – у; заключите его в скобки со знаком плюс перед скобками;
4. Запишите выражение – а + 11 – с + х , запишите выражение, равное этому, в скобках перед
которыми стоит знак минус.
5.Закончите предложение: «Если раскрываются скобки, перед которыми стоит знак плюс, то знаки
слагаемых, стоящих в скобках, …».
6. Закончите предложение: «Если раскрываются скобки, перед которыми стоит знак минус, то
знаки слагаемых, стоящих в скобках, …».
7.Раскройте скобки и найдите значения выражений: - 3,1 – ( - 4,2 + 7,5 – (-1,25)).
Во-первых, её можно упростить. Во-вторых, ты в одном месте не поставил ;. Напишу примерный вид программы, которая должна работать:
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.
Должно сработать))