Procedure prime(n: integer);
var i: integer;
begin
for i := 2 to round(sqrt(n)) do
if n mod i = 0 then
begin
writeln('Число ', n, ' составное');
exit
end;
writeln('Число ', n, ' простое')
end;
begin
prime(3);
prime(8);
prime(23);
prime(35);
end.
Вывод:
Число 3 простое
Число 8 составное
Число 23 простое
Число 35 составное
Всего 3-буквенных слов, составленных из этих букв без ограничений на число букв А, 4^3 = 64 (на каждое из трёх мест претендуют 4 буквы, бувы можно выбирать независимо).
Из них не подходят (не содержат букв А) 3^3 = 27 (тут на каждое место по 3 буквы).
Тогда подходящих 64 - 27 = 37.
Жили-были дед да баба в Розовом Королевстве. Все жители этого королевства обожали розовый цвет и предпочитали его всем другим цветам. Даже лапти люди носили розового цвета. Однажды внучка в розовом платьице ушла в розовый лес, чтобы собрать розовые грибы в розовом лесу. Но она побежала за розовой лягушкой и заблудилась. Но тут она увидела розового сокола, который сел на полянку, посадил девочку на свою розовую спину и улетел к бабушке и дедушке в их розовый домик. Через некоторое время они поженились и на их свадьбе было очень много розовых роз.
Либо вот:
Шёл как-то бедный мужик, шел по чистому полю, увидал под кустом зайца, обрадовался и говорит:
<span>— Вот когда заживу домком-то! Возьму этого зайца, убью плетью да продам за четыре алтына. На те деньги куплю свинушку. Она принесет мне двенадцать поросеночков. Поросятки вырастут, принесут еще по двенадцати. Я всех приколю, амбар мяса накоплю. Мясо продам, а на денежки дом заведу да сам женюсь. Жена-то родит мне двух сыновей: Ваську да Ваньку. Детки станут пашню пахать, а я буду под окном сидеть да порядки наводить: «Эй вы, ребятки, — крикну, — Васька да Ванька! Шибко людей на работе не подгоняйте, видно, сами бедно не живали! » Да так-то громко крикнул мужик, что заяц испугался и убежал, а дом со всем богатством, с женой и с детьми пропал.</span>
1) сначала переведем все:1Мбайт=1000 Кбайт ,1 Кбайт=1000 байт , 1 байт =8 бит, отсюда получаем 1Мбайт=8000000 бит
1 бод = 4 бит/с значит 28800 бод=115200 бит/с
8000000 / 115200 =69,4 с или примерно 1,15 мин
2) 56600 бод = 226400 бит/с
в 1 мин = 60 с
226400*60=1358400 бит = 169800 байт = 1698 Кбайт = 1,698 Мбайт