• 16 April 2017
    • Українська література
    • Автор: YomashiPrigun

    (паскал) Среди натуральных трехзначных числ вывести те, сумма квадратов цифр которых равна 17

    • Ответ оставил: Мненужнпомошь
    Var   A:integer;BeginFor A:= 100 to 999 do    if Sqr(A div 100)+Sqr((A div 10) mod 10)+Sqr(A mod 10) = 17 then       Write(A,' ')End.Результат работы программы:104 140...
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы