Предмет: Информатика,
автор: fancy888
ПОМОГИТЕ пожалуйста! Написать программу в Паскале. Найти все трехзначные числа, которые можно представить разностью между квадратом числа, образованного первыми двумя цифрами и квадратом третьей цифры. Очень нужно!
Ответы
Автор ответа:
0
Вот программа:
var n,i:integer;
begin
for i:=100 to 999 do
if i=(i div 10)*(i div 10)-(i mod 10)*(i mod 10) then writeln(i);
end.
А чисел таких оказалось всего 2:
100
147
var n,i:integer;
begin
for i:=100 to 999 do
if i=(i div 10)*(i div 10)-(i mod 10)*(i mod 10) then writeln(i);
end.
А чисел таких оказалось всего 2:
100
147
Автор ответа:
0
Спасибо огромное.
Похожие вопросы
Предмет: Математика,
автор: omadaminovotabek420
Предмет: Қазақ тiлi,
автор: BibarysBeybutov
Предмет: Литература,
автор: meiguli88
Предмет: Химия,
автор: kristi1050
Предмет: Математика,
автор: ArianaGrandeAriana