В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
shydik37
shydik37
30.10.2021 20:57 •  Информатика

На языке паскаль составить программу, которая в диапазоне найдёт все тройки натуральных а,в,с, подчиняющихся равенству a^2+в^2=с^2

Показать ответ
Ответ:
простолера2
простолера2
04.10.2020 13:03
// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
// Внимание! В других версиях работа не гарантируется!
begin
  for var a:=1 to 300 do
    for var b:=1 to 300 do
      for var c:=1 to 300 do
        if a*a+b*b=c*c Then Write(a,',',b,',',c,' ');
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота