Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
все слова по 6 букв, в каждом в середине находится "оро", в каждом присутствуют одни и те же гласные на тех же местах
остатки от деления 72*n на 105 где n начинается с 2
var i, j: integer;
begin for i : = 2 to 100 do writeln(i*72 mod 105); end.
3967845128451189057249663301026936375429814815875421936027996633072396784512845118905724966330102693637542981481587542193602799663307239
дальше идет повторение т.е. нет остатка 1
то же самое будет если делить 105n с остатком на 72 не будет остатка 1
чесно говоря не уверенна что понимаю
найти первое предложение
пока есть найденное предложение
перевести его
записать перевод
найти следущее предложение
конец цикла
var n,i: integer;
begin
read(n);
for i: = 2 to (n-1) do
if n mod i ==0 then begin
writeln('no');
break;
end;
writeln('yes');
end.
Популярные вопросы