1)записать условие оператор в котором значение переменной рассчитывается по формуле: а+в,

Задание 1
var a,b,c:integer;
begin
writeln (Введите два числа);
readln (a,b);
if (a mod 2)=0 then
c:=a*b
else c:=a+b;
writeln(c);
readln;
end.
Задание 2
var x, y: integer;
begin
write (x = );
readln (x);
if x gt; 3 then
y := x*x + 5
else
if x lt;=3 then
y := x-8
else
y := абс (x);
writeln (y = , y);
readln
end.
Задание 3
var a,b,c,max:integer;
begin
read(a,b,c);
if a gt; b then
max:=a
else
max:=b;
if max gt; c then
write(max)
else
write(c);
end.
ИЛИ
var a,b,c:integer;
begin
read(a,b,c);
if (a gt; b) and (a gt; c) then
write(a)
else
if (b gt; a) and (b gt; c) then
write(b)
else
write(c);
end.