Даны 2 числа. Написать программу, которая умножает - вопрос №2211661701 от parvizmirzoev03 27.07.2022 19:40

Question

Информатика: Даны 2 числа. Написать программу, которая умножает каждое из этих чисел на 2, только если эти числа не равны.(На языке Паскаля)

parvizmirzoev03 · Answer

program 2 числа;    var a, b: real;begin  writeln ( Введите a,b );readln(a, b);if a=b then    a:=a*2;    b:=b*2;    writeln (a, b);else    writeln ( Числа равны );end.Объяснение:Вроде так...