Есть ответ 👍

Здравствуйте правильно ли я прономеровала команды алгоритма ?

192
353
Посмотреть ответы 3

Ответы на вопрос:


да.все верно


хапвннвм55 бьрмлшо атре

Kroo66944
4,6(81 оценок)

Var a,b: integer; sum: integer; begin writeln('введите первое число'); readln(a); writeln('введите второе число'); readln(b); if (a< > b) then begin a: =a+1; b: =b+1; writeln('числа не равны'); writeln('a= ',a); writeln('b= ',b); end; if (a=b) then begin  sum: =a+b; sum: =sum*2; writeln('числа равны'); writeln('удвоенная сумма= ',sum); end; end.

Популярно: Информатика