//FPC 2.6.4
Program sieve_of_Eratosthenes;
var
n, i, x:integer;
a: array[1..32000] of boolean;
begin
readln(n);
for i:=2 to (n+1) div 2 do
begin
x:=i*2;
while x<=n do
begin
a[x]:=true;
x:=x+i;
end;
x:=0;
end;
for i:=1 to n do if not a[i] then write(i,' ');
readln;
end.
int main(int argc, char* argv[])
{
char s[256] = {0};
char prevChar = {0};
std::cin >> s;
int len = strlen(s);
prevChar = s[0];
int count = 1;
for (int i = 1; i < len+1; i++)
{
if (s[i] == prevChar) {
count++;
} else {
printf("%d %c\n", count, prevChar);
count = 1;
prevChar = s[i];
}
}
return 0;
}
Begin
writeln(' *');
writeln(' * *');
writeln(' * *');
writeln(' * *');
writeln(' * * *');
writeln(' * *');
writeln('*************');
writeln(' * *');
writeln(' * ***** *');
writeln(' * * * * *');
writeln(' * ***** *');
writeln(' ***********');
writeln('Фамилия');
end.
Обьект управления: петух.
Управляющее воздействие:
звуковое.
Я так думаю:))))