Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой...

0 голосов
208 просмотров

Даны две переменные целого типа: A и B. Если их значения не равны, то присвоить каждой переменной максимальное из этих значений, а если равны, то присвоить переменным нулевые значения.Вывести новые значения переменных А и В.Сделать в алгоритме ветвления.


Информатика (76 баллов) | 208 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var a,b:integer;
begin
write('a='); readln(a);
write('b='); readln(b);
if a=b then begin a:=0; b:=0; end
        else if a>b then b:=a else a:=b;
writeln('a=',a,'   b=',b);
end.

Пример:
a=3
b=5
a=5   b=5

(194k баллов)
0

сможете решить этот ветвлением алгоритма

0

Не понимаю Ваш вопрос. Оператор If реализует ветвление в программе.