Pascal. Ввести с клавиатуры два числа.Определить,что больше,разность квадратов или модуль квадрата разности этих чисел. Ответ вывести в виде сообщения.
помогите пжлст
Ответы
Ответ дал:
2
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.
musicwave15:
в качестве благодарности, можно нажать на кнопочку: "Лучший ответ"
Вас заинтересует
4 месяца назад
4 месяца назад
5 месяцев назад
2 года назад
2 года назад
7 лет назад