1.--------
var a, b, c: integer;
begin
writeln('Введи два числа:');
read(a, b);
c := a + b;
write('Сумма=', c);
end.
-------------------
2. n=6; блок-схема на картинке;
------------------
3.
program z3;
var a, b: integer;
begin
Writeln('Введите 2 числа:');
readln(a, b);
if a > b then
begin a := a * 5;
writeln(a);
end;
if b > a then
begin
b := b * 5;
writeln(b);
end;
end.
------------
