Есть ответ 👍

Нужно написать программу.введите с клавиатуры 2 числа а и в,если числа не равны,то замените каждое из них на 0 и выведите результатом на экран.если они равны,то найдите и выведите удвоенную сумму этих чисел

287
385
Посмотреть ответы 3

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


var  a, b: real;   //инициализируем 2 действительных переменных

begin  writeln('введите 2 числа');   readln(a, b);   //вводим 2 числа  if a < > b then   {если числа не равны, то присваиваем переменным нули и печатаем их, иначе печатаем удвоенную сумму этих чисел}  begin    a: = 0;     b: = 0;     writeln('a = ', a, ', b = ', b);   end  else writeln('2 * (', a, ' + ', b, ') = ', 2 * (a + b)); end.

если все правильно, отметь решение как лучшее)


var a,b: integer;

begin

readln(a,b);

if a< > b then begin a: =0; b: =0; writeln(a,' ',b); end else writeln(2*(a+b));

end.


800 / (16-8) = 100 ответ : 100

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