1. Информатика
  2. Определите и выведите на экран

Определите и выведите на экран количество чисел в промежутке от 100 до 1000 делящихся без остатка одновременно на 5 и 21 заранее

arturpushkin202453 arturpushkin202453    2   12.06.2019 08:10    0

Ответы
rustamzade2018 rustamzade2018  09.07.2020 21:55
Var i,k:integer;
begin
k:=0;
for i:= 100 to 1000 do if (i mod 5=0) and (i mod 21=0) then k:=k+1;
write(k)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
марго398 марго398  21.05.2020 13:03
Створити програму на знаходження n-го числа ряду Фібоначч надо решить, очень если вы не знаете как решить, не надо писать сюда, хз, не знаю...​...
Крад Крад  21.05.2020 13:03
Решить задачу: Найти сумму четных цифр числа (с цикла ДЛЯ) КуМир...
Arseni01 Arseni01  29.01.2022 00:45
кому не сложно: 1) Когда тело цикла с параметром будет выполняться бесконечно?2) При каком значении условия выполняется цикл с предусловием?3) При каком значении условия выполняется...
bogdanmaltsev bogdanmaltsev  29.01.2022 00:46
1. Запишите алгоритм в пошаговой форме и в виде блок-схемы: «Дано натуральное число N 1. Присвоить a значение 1, затем присвоить величине d значение 2. Пока d N выполнять следующие...
lolsasafd lolsasafd  29.01.2022 00:51
Какими бывают запросы на выборку? а) Простыеб) составныеE) Сложныег) КомбинированныеОтолько а, вОтолько б, вОтолько а, бОтолько, г...
XaMeJIuoH XaMeJIuoH  06.06.2019 06:00
Определите силу, с которой воздух давит на поверхность стола площадью s=1,20 м², если барометр показывает давление p=760 мм рт. ст....
Anyazolotiya Anyazolotiya  06.06.2019 06:00
Решите уравнение 1/9х-9х+7/63х нужно !...
VLADWER5 VLADWER5  06.06.2019 06:00
Надо рассчитайте, сколько граммов 40% раствора этилового спирта можно получить из 1,5 моль глюкозы при спиртовом брожении....
katerinaplachet katerinaplachet  06.06.2019 06:00
Надо вместо _ ппопусков поставть следующие слова: for to while from on when of during at , on friday it was raining the whole morning and we decieded to go (1) _ madame tussauds...
Nic5748796237067736 Nic5748796237067736  06.06.2019 06:00
км/ч=/мин 30км/ч =/мин 180 км/ч =/мин...

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