Вопрос по информатике:
Напишите программу которая находит все целые числа от 200 до 500 у которвх ровно 6 делитилей на языке паскаль
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 07.09.2017 00:05
- Информатика
- remove_red_eye 18233
- thumb_up 10
Ответы и объяснения 1
// Внимание! Если программа не работает, обновите версию!
begin
for var n:=200 to 500 do begin
var k:=2;
for var i:=2 to n div 2 do
if n mod i=0 then
k+=1;
if k=6 then Print(n)
end;
Writeln
end.
Результат
207 212 236 242 243 244 245 261 268 275 279 284 292 316 325 332 333 338 356 363 369 387 388 404 412 423 425 428 436 452 475 477
- 07.09.2017 03:18
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.