ПОМОГИТЕ! Составьте программу , которая выводит последовательность 50,48,46,44……2 И...

Question

ПОМОГИТЕ! Составьте программу , которая выводит последовательность 50,48,46,44……2 И ЕЩЁ,ТУТ НУЖЕН ЦИКЛ downto ИЛИ ПРОСТО to?Я НЕ ПОНИМАЮ. Главное сделайте через For i := 1 to n do begin.

Answer 1

Ответ:

var i:integer;

Begin

for i:= 50 downto 2 do

if (i mod 2) = 0 then write(i, ' ');

End.