Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13?
Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13.
Var i, a, b, c : integer ;
For i : = 10 to 99 do
if c mod 13 = 0 then
Помогите сделать?
Среди двухзначных чисел найти те, сумма квадратов цифр которых делится на 13 .
Какртинка это пример как надо делать.
Найти все числа, которые делятся на N среди :а)всех двузначных чисел ;б)всех трёхзначных чисел?
Найти все числа, которые делятся на N среди :
а)всех двузначных чисел ;
б)всех трёхзначных чисел.
Помогите пожалуйста?
Из всех двузначных чисел вывести на экран те из них , сумма цифр которых равна А.
Найти все числа, которые делятся на N средиа) всех двузначных чисел ; б) всех трёхзначных чисел?
Найти все числа, которые делятся на N среди
а) всех двузначных чисел ; б) всех трёхзначных чисел.
Из всех двузначных чисел вывести на экран те из них, сумма цифр которых равна А?
Из всех двузначных чисел вывести на экран те из них, сумма цифр которых равна А.
( А вводится с клавиатуры).
Среди двузначных чисел найти те, которые делятся на число q, а сумма тех цифр равна n ( 0?
Среди двузначных чисел найти те, которые делятся на число q, а сумма тех цифр равна n ( 0.
Среди двухзначных чисел найдите те, сумма квадратов цифр которых делиться на 13?
Среди двухзначных чисел найдите те, сумма квадратов цифр которых делиться на 13.
Найдите количество двузначных чисел, которые делятся на сумму своих цифр?
Найдите количество двузначных чисел, которые делятся на сумму своих цифр.
Найдите количество двузначных чисел, которые делятся на сумму своих цифр?
Найдите количество двузначных чисел, которые делятся на сумму своих цифр.
Найдите количество двузначных чисел, которые делятся на сумму своих цифр?
Найдите количество двузначных чисел, которые делятся на сумму своих цифр.
Вы находитесь на странице вопроса Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 5 — 9 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Как то так / / PascalABC. NET 3. 3, сборка 1573 от 04. 11. 2017 / / Внимание! Если программа не работает, обновите версию! Begin var i : integer ; var ur1 : = ReadReal('ur1 = ') ; var ur2 : = ReadReal('ur2 = ') ; var p : = ReadReal('p = ') ; for..
1. действие в скобках 2. Инверсия 3. Конъюнкция 4. Дизъюнкция.
Program sqrt ; var a, b : integer ; begin write('Введите N : ') ; read(a) ; b : = sqrt(100 + sqrt(98 + sqrt(96 + a + sqrt(2)))) ; writeln('Результат — ', b) ; end.
3 / 256 Мбайта = 1024 * 3 / 256 Кбайт = 12 Кбайт = 12 * 1024 байт = 12 * 1024 * 8 бит Память для одного символа = 12 * 1024 * 8 / 6144 = 16 бит Мощность алфавита = 2 ^ 16 = 16384.
Пользавателей которые зарегестрированны в почтовом индексе.
Это матрица, элементами которой являются 0 или 1.
Вот, этого нарисуй, там изи, получается в итоге норм.
Var S, tmp : real ; n, i : integer ; begin write('Введите n : ') ; readln(n) ; for i : = 1 to n do begin tmp : = 1 / ((2 * i + 1) * 3) ; S : = S + tmp ; end ; writeln(S : 8 : 10) ; readln ; end.
/ / PascalABC. NET begin write('Длина меньшей стороны : ') ; var a : = ReadlnReal ; writeln('Длина диагонали равна ', sqrt(a * a + 9 * a * a) : 8 : 3) end.
Среди двузначных чисел найти те сумма квадратов цифр которых делится на 13
Вопрос по информатике:
Среди двузначных чисел найти те, сумма квадратов цифр которых делится на13
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок — бесплатно!
- 27.04.2017 07:22
- Информатика
- remove_red_eye 16367
- thumb_up 16
Ответы и объяснения 1
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.
- 28.04.2017 23:06
- thumb_up 25
Знаете ответ? Поделитесь им!
Как написать хороший ответ?
Чтобы добавить хороший ответ необходимо:
- Отвечать достоверно на те вопросы, на которые знаете правильный ответ;
- Писать подробно, чтобы ответ был исчерпывающий и не побуждал на дополнительные вопросы к нему;
- Писать без грамматических, орфографических и пунктуационных ошибок.
Этого делать не стоит:
- Копировать ответы со сторонних ресурсов. Хорошо ценятся уникальные и личные объяснения;
- Отвечать не по сути: «Подумай сам(а)», «Легкотня», «Не знаю» и так далее;
- Использовать мат — это неуважительно по отношению к пользователям;
- Писать в ВЕРХНЕМ РЕГИСТРЕ.
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи — смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Найти все двузначные числа сумма квадратов цифр которые делятся на 13
Алгоритм
Берем ряд чисел от 10 до 99 и выводим те из них, которые удовлетворяют условию. Цифры числа получаем путем нахождения целой части деления числа на 10 (старшая цифра) и остатка от такого деления (младшая). Если число кратно 13, то остаток от его целочисленного деления на 13 нулевой.
Программа
( PascalABC.NET 3.2, сборка 1385 от 14.02.2017 )
begin
Range(10,99).Where(n->(sqr(n div 10)+sqr(n mod 10)) mod 13=0).Println
end.
Результат
15 18 23 32 46 47 51 64 69 74 79 81 96 97
Если тебя не устраивает ответ или его нет, то попробуй воспользоваться поиском на сайте и найти похожие ответы по предмету Информатика.