Обосрамс Шрамов
Оракул
(57782)
6 лет назад
Вариант 3.
1. выведет в строку 543212321
2.
вот программа
PROGRAM TuKpa6;
var
n,y:integer;
procedure F(n:integer);
begin
if n>2 then
begin
writeln(n); //3,
y:=n-2;
f(y*n);
end
else
if n<=2 then
begin
write(n-1);
end
else
begin
write(n);
end;
end;
BEGIN
f(7);
END.
результат вывода в строку
73511551331715-359315454
или вот он же в столбик
7
35
1155
1331715
-359315454
не знаю что нада
3. выведет 55 звёздочек