Четырехзначное число, у которого первая цифра равно второй а третья четвертой, является квадратом двузначного числа. Найти эти числа. (паскаль, циклы)

Question

Информатика

Галка

6 мая, 01:32

Четырехзначное число, у которого первая цифра равно второй а третья четвертой, является квадратом двузначного числа. Найти эти числа. (паскаль, циклы)

+5

Ответы (1)

Знаешь ответ?

Надюся · Answer 1

Uses crt;

var i, j:integer;

begin

for i:=1000 to 9999 do

for j:=10 to 99 do

if ((i div 1000) = (i div 100) mod 10)

and ((i div 10) mod 10=i mod 10)

and (i=j*j) then writeln (i);

end.