Sl1dan

05.02.2021 13:44 •  Информатика

1. Записать на языке Паскаль высказывание: а) «Верно ли, что хотя бы одно из чисел a или b оканчивается на 0;
б) «Если оба числа а и b кратны 5, то найти сумму квадратов этих чисел, в противном случае найти квадратный корень от суммы этих чисел. Результат записать в переменную с»;
в) «Если значение переменной а больше 100, то увеличить значение b и c в 4 раза, результаты присвоить в переменные d и e»;

2. Запишите результат выполнения оператора:
а) a:=14; b:=17;
If (a mod 7<>1) or (b mod 7<>1) then begin a:=a+b;b:=b-a;end else b:=b+a;
Write(b,a)
б) a: = 3; b: = 8; c: = 5;
if a > b then x: = a + b
else begin a: = b + c; x: = a - 2 * b
end;
в) a: = 10; b: = 5; c: = 6;
if (a > b) and (b > c) then x:=3 * a + 2 * b + c
else x: = 5 * a - b + c;
г) a: = 3; b: = 8; c: = 5;
if a > b then x: = a + b
else begin a: = b + c; x: = a - 2 * b
end.