Четырехзначное число,у которого первая цифра равно второй а третья четвертой,является квадратом двузначного числа. Найти эти числа.(паскаль,циклы)
Четырехзначное число,у которого первая цифра равно второй а третья четвертой,является квадратом двузначного числа. Найти эти числа.(паскаль,циклы)
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы