Ввести число, вывести числа по схеме:5 5 5 5 5 4 4 4 4 3 3 3 2 2 1Программа в паскале
Ввести число, вывести числа по схеме:
5 5 5 5 5
4 4 4 4
3 3 3
2 2
1
Программа в паскале
Гость
Ответ(ы) на вопрос:
Гостьvar i, x, j: integer;
begin
readln(x);
for i := x downto 1 do
begin
for j := 1 to i do
write(i, ' ');
writeln();
end;
end.
Не нашли ответ?
Похожие вопросы