Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Получилась следующая сумма: 11 101 014
все слова по 6 букв, в каждом в середине находится "оро", в каждом присутствуют одни и те же гласные на тех же местах
var n,i: integer;
begin
read(n);
for i: = 2 to n-1 do
if n mod i = 0 then writeln('no');
end.
s: string;
read(s);
for i: = 1 to length(s) do
if s[i]="a" then n: =n+1;
writeln(n);
Популярные вопросы