Помогите сделать. Среди двухзначных чисел найти те, сумма квадратов цифр которых делится на 13 . Какртинка это пример как надо делать
Приложения:
Ответы
Ответ дал:
0
var i,n : longint;
begin
read (n);
for i:=10 to 99 do begin
if (sqr(i mod 10))+(sqr(i div 10)) mod 13 = 0 then write (i,' ') else continue;
end;
end.
Вроде верно...
begin
read (n);
for i:=10 to 99 do begin
if (sqr(i mod 10))+(sqr(i div 10)) mod 13 = 0 then write (i,' ') else continue;
end;
end.
Вроде верно...
Вас заинтересует
1 год назад
1 год назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
9 лет назад