Помогите пожалуйста,распечатать на паскале первые nчетных чисел,заранее пасибо
Помогите пожалуйста,распечатать на паскале первые nчетных чисел,заранее пасибо
Гость
Ответ(ы) на вопрос:
Гостьvar a:array[1..100] of integer;
n:integer;
begin
readln(n);
for i:=1 to 2*n do
if a[i] mod 2 =0 then writeln(a[i]);
end.
Не нашли ответ?
Похожие вопросы