1. Информатика
  2. Pascal. сумма квадратов цифр

Pascal. сумма квадратов цифр некоторого двузначного числа на 1 больше утроенного произведения этих цифр. после деления этого двузначного числа на сумму его цифр в частном получается 7 и в остатке 6. составить цикл нахождения числа, если он существует.

пиrotехник пиrotехник    2   13.06.2019 20:40    7

Ответы
Masha07041 Masha07041  10.07.2020 18:18
For i:=1 to 9 do
for j:= 0 to 9 do
if((i*i+j*j-3*i*j=1)and((i*10+j)div(i+j) = 7)and((i*10+j)mod(i+j) = 7) then write('Искомое число',i*10+j);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
vanekroland01 vanekroland01  07.04.2020 11:57
Программисты-информатики, нужна из некого числа вычли сумму его же цифр, после чего из результата снова вычли сумму его цифр и так далее. через сколько таких действий получится 0?...
DFSAFSA DFSAFSA  07.04.2020 11:58
Створіть проект у якому можна обчислити кількість двоцифрових чисел серед чисел,перше з яких 10,а кожне наступне більше від попереднього на задане додатне число, буду благодарен...
irishkaevdokimova14 irishkaevdokimova14  07.04.2020 11:58
База данных хранит географические сведения о разных странах. Для каждой страны хранятся столица, площадь, количество жителей, национальности жителей, расположенные на территории страны...
StacyZviozdohkina StacyZviozdohkina  01.04.2020 11:46
Сколько персонажей в игре? ( ) основная идея? ( ) перечисли основные действия персонажей ( ) есть ли в программе команды циклического алгоритма? ( ) найдите ошибку и исправьте её ​...
Alex1t0 Alex1t0  01.04.2020 11:59
Статья, набранная на компьютере, содержит 16 страницы, на каждой странице 32 строк, в каждой строке 64 символа. Определите размер статьи в кодировке КОИ-8, в которой каждый символ...
dmitriybatulin dmitriybatulin  01.04.2020 12:00
написать программу на питоне...
mssinkevichna mssinkevichna  01.04.2020 12:02
4. Складіть проект для малювання кіл різного кольору, поки виконавець не доторкнеться до межі Сцени....
podgainiyroma podgainiyroma  01.04.2020 12:05
Книга содержит 148 страниц. На каждой странице 31 строк. В каждой строке 57 символов (включая пробелы). Найти информационный объём текста, считая, что каждый символ кодируется одним...
visnevskay1 visnevskay1  01.04.2020 12:16
Смоделировать файловую систему на виртуальной машине в соответствии с требовваниями:  объем внешней памяти, используемой для хранения файловой системы – не менее 64К;  размер кластера...
meloo1 meloo1  01.04.2020 12:16
Кто знаєт как звязатца з главним...

Популярные вопросы