Операторы цикла: определить количество чисел между 20 и 1000, которые делятся без остатка одновременно на 4, 5 и 9 - Pascal

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.67/6:

@Ximer 7 / 6 / 0 Регистрация: 25.01.2009 Сообщений: 66

	Операторы цикла: определить количество чисел между 20 и 1000, которые делятся без остатка одновременно на 4, 5 и 9 10.04.2009, 20:39. Показов 1146. Ответов 2 Метки нет (Все метки) Помогите пожалуйста с решением. 1)Определите и выведите на экран кол-во чисел между 20 и 1000, которые делются без остатка одновременно на 4, 5 и 9. 0

Лучшие ответы (1)

Сообщение: #135243

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

10.04.2009, 20:39

Ответы с готовыми решениями:

Программа на паскале - Найдите сумму натуральных чисел от 1 до 1000, которые делятся без остатка на 7 и не делятся без остатка на 13
Требовалось решить задачу по математике: Найдите сумму натуральных чисел от 1 до 1000, которые...

Количество чисел между 100 и 1000, которые делятся без остатка одновременно на 13 и 15
определите и выведите на экран количество чисел между 100 и 1000, которые делятся без остатка...

Операторы цикла. Среди двузначных чисел вывести на экран те, которые делятся на 8 без остатка
Помогите, кто-нибудь, пожалуйста, совсем не разбираюсь... Среди всех двузначных чисел вывести на...

yanyk1n

4342 / 1474 / 680

Регистрация: 12.03.2009

Сообщений: 5,310

10.04.2009, 20:47

Сообщение было отмечено Ximer как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
program fff;
uses crt;
var i:integer;
 
begin
 clrscr;
 for i:=20 to 1000 do if i mod 180=0 then write(i,' ') {4*5*9=180}
 readln;
end.

@Ximer 7 / 6 / 0 Регистрация: 25.01.2009 Сообщений: 66
	10.04.2009, 20:57 [ТС]
	Спасибо 0

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

10.04.2009, 20:57

Помогаю со студенческими работами здесь

Одномерные массивы. Определить произведение элементов, которые без остатка делятся на 2 и не делятся на 3
Ребят помогите пожалуйста с двумя задачами "одномерные массивы" 1)Ввести одномерный массив A из...

Определить числа, которые делятся без остатка одновременно на 11 и 17
Ничего не получается..помогитеее:( Определите и выведите на экран числа и их количество в...

Определить в массиве сумму элементов, чьи значения без остатка делятся на 3 и не делятся на 2
1)Ввести одномерный массив А из 12 эл. определить в нем сумму эл. чьё значение без остатка делится...

Выведите на экран числа от 13 до 100, которые делятся без остатка на 11 и 17 одновременно
Помогите с задачами по информатике на Паскале: 1.Выведите на экран числа от 13 до 100, которые...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .	Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .	Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .

Наверх