С помощью Паскаля: 1. В магазине продается мастика в ящиках по 15 кг,17 кг,21 кг. Как…

Question

60

С помощью Паскаля: 1. В магазине продается мастика в ящиках по 15 кг,17 кг,21 кг. Как купить ровно 185 кг мастики, не вскрывая ящики? Сколькими способами можно это сделать? 2. Ввести натуральное число N и вывести все натуральные числа, не превосходящие N и делящиеся на каждую из своих цифр. Пример: Введите N: 15 1 2 3 4 5 6 7 8 9 11 12 15.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

fedyabelkin · Accepted Answer

95

fedyabelkin

05 апреля 2023

2) Program asd; USES crt; Var n,i,t,p: integer; BEGINClrscr; readln (n); for i: =1 to n dobegint: =i; p: =1; repeatp: =p*(t mod 10); t: =t div 10; until t=0; if (p<>0) and (i mod p=0) then write (i,'); end; Readln; END. Сейчас первую дорешаю

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: