Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Andr1055
0 / 0 / 0
Регистрация: 26.10.2014
Сообщений: 10
1

Задача с оператором цикла на нахождение числа

26.10.2014, 14:47. Просмотров 889. Ответов 1
Метки нет (Все метки)

Сумма квадратов цифр некоторого двузначного числа на 1 больше утроенного произведения этих цифр. После деления этого двузначного числа на сумму его цифр в частном получается 7 и в остатке 6. Составить алгоритм поиска этого числа, если оно существует
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.10.2014, 14:47
Ответы с готовыми решениями:

любым оператором цикла

задания с оператором цикла For
№1 ВЫЧИСЛЕНИЕ ПРОИЗВЕДЕНИЯ ЭЛЕМЕНТОВ ПОСЛЕДОВАТЕЛЬНОСТИ ...

Блок-схема с оператором цикла.
Дана задача: Дан одномерный массив В элементы которого формулируются по...

Табулирование функции с оператором цикла
Используя операторы Паскаль-"Пока" и "До" составить программы табулирования...

Разработать программу с оператором цикла
Помогите пожалуйста с задачкой Разработать программу с помощью оператора цикла...

1
vint-81
охотник
1009 / 533 / 650
Регистрация: 29.09.2014
Сообщений: 1,083
26.10.2014, 15:50 2
Лучший ответ Сообщение было отмечено Andr1055 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
var i,n:integer;
begin
 i:=9; 
 repeat
 inc(i)
 until (((sqr(i div 10)+sqr(i mod 10))=(1+3*((i div 10)*(i mod 10))))and
       (i div((i div 10)+(i mod 10))=7)and(i mod((i div 10)+(i mod 10))=6)) or (i>99);
 if i<100 then writeln(i)
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.10.2014, 15:50

Не могу розобратся с оператором цикла repeat
Program Third; var a, b, x, Y : Double; begin a:=0.47; b:=0.56; x:=0;...

Написать код вычисления функции с оператором цикла for
Помогите с формулой возведения в степень, пожалуйста \sum_{i=1}^{n}x^i

Протабулировать функцию одной переменной с оператором цикла While
Протабулировать функцию одной переменной с помощью оператора цикла WHILE....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru