Даны 2 переменные целого типа а и в. если их значение не равны , то присвоить каждой переменной сумму этих значений, а если равны, то присвоить переменным нулевые значения. вывести новые значения а и в. 1.составить алгоритм линейной структуры. записать алгоритм в словесной и графической. 2.составить алгоритм ветвящейся структуры.записать алгоритм в словесной и графической. 3.составить алгоритм циклической структуры.записать алгоритм в словесной и графической.
var a,b:integer;
begin
write('a = ');
readln(a);
write('b = ');
readln(b);
if a<>b
then begin a:=a+b; b:=a; end
else begin a:=0; b:=0; end;
writeln('a = ',a,' b = ',b);
end.
Пример:
a = 2
b = 5
a = 7 b = 7