Var
a, b, i, j, found: integer;
begin
readln(a, b);
for i := a to b do
begin
found := 1;
for j := 2 to round(sqrt(i + 1)) do
begin
found := found * (i mod j);
if found = 0 then break;
end;
if found <> 0 then write(i, ' ');
end;
end.
36 часов понадобится,так как столб 60 см,с 12 до 24 улитка ползёт 25 см,с 00 до 12 улитка ползёт 10 см,и с 12 до 24 улитка ползёт 25 см,склади 25+25+10=60 см
Графическое изображение значения ряда данных в диаграмме
Каждая последующая цифра умножается на 3.
1392781243729...
Всего 52 ребёнка
Половина любит конфеты
20 человек и конфеты и мороженное
Сколько детей любит мороженное? Сколько детей любит только мороженное.
Решение:
1) 52:2=26 детей любит конфеты
2) 26+20=46 детей любят и то и то
Ответ: 26 детей любят только мороженное