написать последовательность чисел 10 8 6 4 2 0

[Neytron]

подскадите пожалуйста, как написать последовательность чисел 10 8 6 4 2 0. помогите пожалуйста, а то чет никак не получается

[sheka]

for i:=5 downto 0 do write(2*i:3);

[Neytron]

выложите пдлиз всю программу

[sheka]

Сообщение от Neytron

выложите пдлиз всю программу

открой книгу.прочитай 7ю страницу сверху.

ты паскаль в глаза видел?!

[Hacker19_90]

program forum;
uses crt;
var i: integer;
begin
    clrscr;
    for i := 5 downto 0 do
        write (i*2:3);
    ReadKey;
end.

[sheka]

var i: integer;
begin
    for i := 5 downto 0 do write (i*2:3);
end.

человеку должно быть стыдно за такие вопросы!

[Serge_Bliznykov]

а ещё можно вообще без переменных сделать программу :

begin
  WriteLn('10 8 6 4 2 0');
end.

[SWAT92Shtorm]

Сиёзно попрослил вывести вот те WriteLN =)