Задать вопрос
5 апреля, 16:45

Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13

+5
Ответы (1)
  1. 5 апреля, 17:22
    0
    Var i, a, b, c:integer;

    Begin

    For i : = 10 to 99 do

    begin a:=i div 10;

    b:=i mod 10;

    c: = a*a+b*b;

    if c mod 13=0 then

    writeln (i) ;

    end;

    End.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
На языке паскаль: 1. Проверить, делится ли произведение пяти натуральных чисел на первое из них нацело. 2. Определите количество двузначных чисел, сумма квадратов цифр которых делится без остатка на 15.
Ответы (1)
Дано натуральное число: определить а) количество цифр в нем б) сумму его цифр в) произведение его цифр г) среднее арифметическое его цифр д) сумму квадратов его цифр е) сумму кубов его цифр ж) его первую цифру з) сумму его первой и последней цифр
Ответы (1)
Задачи: 1) Найти насколько (количество) двузначных чисел кратных 3 больше чем двузначных чисел кратных 5.
Ответы (1)
Помогите составить программу на языке С! С клавиатуры вводится целое число. Определить кол-во цифр в нем, сумму его цифр, произведение его цифр, среднее арифметическое его цифр, сумму квадратов его цифр, сумму кубов его цифр.
Ответы (1)
Автомат получает на вход два двузначных десятичных числа. По полученным числам строится новое десятичное число по следующим правилам. 1. Вычисляются два числа - сумма цифр первого числа и сумма цифр второго числа. 2.
Ответы (1)