дано четырёхзначное число, составьте программу с помощью которой определите, равняются ли в нем сумма квадратов средних цифр и произведений крайних цифр
Ответы
Ответ дал:
0
program ravn_kvsred_pr_krai;
var
x:integer;
begin
read(x);
if((x div 1000)*(x mod 10))=((x div 10 mod 10)*(x div 10 mod 10)+(x mod 100 div 10)*(x mod 100 div 10))
then
write('да')
else
write('нет')
end.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад