• . Составить программу для нахождения и печати всех Пифагоровых чисел, не превышающих 20.

Ответы 1

  • Пифагоровыми числами называются числа, для которых выполняется равенство a²+b²= c². //Pascalvar  i, j, k: integer;begin  for i := 1 to 20 do    for j := i to 20 do      for k := j to 20 do if i * i + j * j = k * k then writeln(i:4, j:4, k:4);  end.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years