Задать вопрос
12 августа, 14:58

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

+1
Ответы (1)
  1. 12 августа, 17:23
    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)