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