Регистрация
Татьяна201712
04.06.2021 21:10
Информатика
Есть ответ 👍

Pascal. ввести с клавиатуры два числа.определить,что больше,разность квадратов или модуль квадрата разности этих чисел. ответ вывести в виде сообщения.

221
482
Посмотреть ответы 2

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

Odarchuk
Odarchuk
4,4(43 оценок)

var a,b,index,index2: integer;

begin

write('a=');

  readln(a);

write('b=');

  readln(b);

index: =(a*a-b*b);

index2: =(a-b)*(a-b);

if(index > index2) then

  write('больше разность квадратов');

if(index2 > index) then

    write('больше модуль квадрата разности этих чисел');

end.

fjdjwjqksnddjj
fjdjwjqksnddjj
4,5(22 оценок)
Ав чём проблема? если было в 16 - битной кодировке , а стало в 8 битной следовательно уменьшилось в 2 раза , то есть 80 * 2 ответ 160

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