Home
О нас
Products
Services
Регистрация
Войти
Поиск
suicideseason
@suicideseason
November 2021
1
10
Report
найдите и выведите на экран все трехзначные числа, кратные 20, сумма цифр которых равна сумме цифр частного от деления их на 20.
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
quluquliyev191
Var
i,s1,s2:integer;
begin
i:=100;
repeat
s1:=(i div 100)+((i mod 100) div 10)+(i mod 10);
s2:=i div 20;
s2:=(s2 div 10)+(s2 mod 10);
if s1=s2 then Writeln(i);
i:=i+20;
until i>999
end.
Результат выполнения программы:
180
360
540
720
900
1 votes
Thanks 3
More Questions From This User
See All
suicideseason
August 2022 | 0 Ответы
chto znachit si v paskale simvol na pozicii i ili kak naiglupejshij vopros
Answer
suicideseason
July 2022 | 0 Ответы
yashik massoj 40 kg soskalzyvaet bez nachalnoj skorosti s vershiny naklonnoj plosk
Answer
suicideseason
July 2022 | 0 Ответы
kak perevoditsya to be around tolko ne pishite byt vokrug ili okolo nado kak
Answer
suicideseason
July 2022 | 0 Ответы
nepolno neznakomyj vsem poprostu kak pishetsya i pochemu
Answer
suicideseason
June 2022 | 0 Ответы
kakie zhivotnye i rasteniya est v savanne yuzhnoj ameriki kakie pochvy preobladayut
Answer
suicideseason
November 2021 | 0 Ответы
sostavit programmu kotoraya udvoit vse soglasnye bukvy i vstavit mezhdu nimi buk
Answer
suicideseason
November 2021 | 0 Ответы
sostavte programmu kotoraya vvedennoe s klaviatury predlozhenie vyvodit v pervoj
Answer
suicideseason
November 2021 | 0 Ответы
primenite slovo yazyk v predlozhenii podrazumevaya yazyk kolokola udarnuyu chast
Answer
suicideseason
November 2021 | 0 Ответы
pochemu osvoenie sibiri v 16 veke shlo uspeshno
Answer
suicideseason
November 2021 | 0 Ответы
nelzya predstavit sebechtoby zhiteli yuzhnoj avstralii ili tasmanii uvideli solnce
Answer
рекомендуемые вопросы
rarrrrrrrr
August 2022 | 0 Ответы
o chem dolzhny pozabotitsya v pervuyu ochered vzroslye pri organizacionnom vyvoze n
danilarsentev
August 2022 | 0 Ответы
est dva stanka na kotoryh vypuskayut odinakovye zapchasti odin proizvodit a zapcha
myachina8
August 2022 | 0 Ответы
najti po grafiku otnoshenie v3v1 v otvetah napisano 9 no nuzhno reshenie
ydpmn7cn6w
August 2022 | 0 Ответы
Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...
millermilena658
August 2022 | 0 Ответы
opredelite kak sozdavalas i kto sozdaval arabskoe gosudarstvo v kracii
MrZooM222
August 2022 | 0 Ответы
ch ajtmanov v rasskaze krasnoe yabloko ispolzuet metod rasskaz v rasskaze opi
timobila47
August 2022 | 0 Ответы
kakovo bylo naznachenie kazhdoj iz chastej vizantijskogo hrama pomogite pozhalujsta
ivanyyaremkiv
August 2022 | 0 Ответы
moment. 6....
pozhalujsta8b98a56c0152a07b8f4cbcd89aa2f01e 97513
sarvinozwakirjanova
August 2022 | 0 Ответы
pomogite pozhalusto pzha519d7eb8246a08ab0df06cc59e9dedb 6631
×
Report "найдите и выведите на экран все трехзначные числа, кратные 20, сумма цифр которы..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
i,s1,s2:integer;
begin
i:=100;
repeat
s1:=(i div 100)+((i mod 100) div 10)+(i mod 10);
s2:=i div 20;
s2:=(s2 div 10)+(s2 mod 10);
if s1=s2 then Writeln(i);
i:=i+20;
until i>999
end.
Результат выполнения программы:
180
360
540
720
900