Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.11.2008, 09:41   #1
Ananim-Pbl6ak
Пользователь
 
Регистрация: 28.10.2008
Сообщений: 77
По умолчанию программа с циклами с параметром

Вывести записи всех чисел 5*4*, в которых пропущенные цифры обозначены *, если известно, что данные числа кратны некоторому А

1. Использовать только простые типы данных.
2. Для организации циклов использовать оператор FOR.
3. Печать результата сопровождать поясняющим текстом
Ananim-Pbl6ak вне форума Ответить с цитированием
Старый 19.11.2008, 09:56   #2
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

И в чем проблема?
Arigato на форуме Ответить с цитированием
Старый 19.11.2008, 10:00   #3
Ananim-Pbl6ak
Пользователь
 
Регистрация: 28.10.2008
Сообщений: 77
По умолчанию

немогу решить(
Ananim-Pbl6ak вне форума Ответить с цитированием
Старый 19.11.2008, 10:08   #4
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Покажите, что уже сделано или расскажите свои идеи по решению задачи.
Arigato на форуме Ответить с цитированием
Старый 19.11.2008, 19:26   #5
Ananim-Pbl6ak
Пользователь
 
Регистрация: 28.10.2008
Сообщений: 77
По умолчанию

думаю перебрать из интервала все число от 0 до 9, т.е должны мы проверить делятся ли числа 5040 5141 5242 5343 5444 5545 5646 5747 5848 5949 на число А, и напечатать их
Ananim-Pbl6ak вне форума Ответить с цитированием
Старый 19.11.2008, 19:42   #6
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Идея верная, только, я думаю, что цифры под * могут отличаться, т.е. будет 5040, 5041, 5042, ..., 5140, 5141, 5142, ...
Реализовать можно с помощью пары вложенных циклов FOR.
Можете решать.
Arigato на форуме Ответить с цитированием
Старый 19.11.2008, 19:57   #7
Ananim-Pbl6ak
Пользователь
 
Регистрация: 28.10.2008
Сообщений: 77
По умолчанию

нет сегодня уточнил под * одинаковые цифры, не могли бы вы хоть начало скинуть а то я прям сижу езнаю с чего начать
Ananim-Pbl6ak вне форума Ответить с цитированием
Старый 19.11.2008, 20:17   #8
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Тогда даже вложенный цикл не нужен.
Вот начало Вашей программы:
Код:
program Zadacha;
var A, I: Integer;
begin
  Write ('Vvedite A: ');
  ReadLn (A);
  ...
Arigato на форуме Ответить с цитированием
Старый 19.11.2008, 20:21   #9
Ananim-Pbl6ak
Пользователь
 
Регистрация: 28.10.2008
Сообщений: 77
По умолчанию

а сам цикл фо нужен же?
Ananim-Pbl6ak вне форума Ответить с цитированием
Старый 19.11.2008, 20:47   #10
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 15,551
По умолчанию

Цитата:
а сам цикл фо нужен же?
Да, нужен цикл For. Делайте.
Arigato на форуме Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
запуск с параметром... prizrak1390 Общие вопросы Delphi 4 16.05.2008 22:29
Работа с циклами 2. Вопрос SPQR Помощь студентам 5 27.10.2007 11:20
Работа с циклами. Надюха Помощь студентам 3 26.10.2007 09:29
Помогите с ЦИКЛАМИ kl45gp Общие вопросы Delphi 11 25.04.2007 16:02