Требуемая формула: К = НОК(N,W) / НОД(N,W)
Пример:
НОК(N,W) = НОК(10,35) = 70
НОД(N,W) = НОД(10,35) = 5
K = 70/5 = 14
Белым снегом замело
Луг и лес кругом.
И, затихнув, речка стала, <span>Скованная льдом.</span>Наступили холода.
Обернулась в лед вода.
Длинноухий зайка серый
Обернулся зайкой белым.
Перестал медведь реветь:
В спячку впал
В бору медведь.
Кто скажет, кто знает, <span>Когда это бывает?
</span><span>Хоть сама
- И снег, и лёд,
а уходит слёзы льёт.
</span>После осени пришла.
И сугробы намела.
<span>Я тепла не потерплю:
Закручу метели,
Все поляны побелю,
Разукрашу ели,
Замету снежком дома,
Потому что я ...
</span><span>Блеснул мороз. И рады мы
Проказам матушки ...
</span>
Begin readarrinteger(5).SortedDescending.Print; end.
Ответ:
1)
Var a,b:integer;
Begin
Read(a,b);
Write((a mod b)+' '+(a div b));
End.
2)
Var a,b,c:integer;
Begin
Read(a,b,c);
If a+b+c>3 then write('<<Зачёт>>')
Else write('<<Незачёт>>');
End.
3)
Var i,count:integer;
Begin
For i:=1 to 50 do
If (i mod 3) =0 then
Count:=count +1;
Write(count);
End.
Формальные:плеер,пароварка,машина
Неформальные:человек,животное