Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
i,n: integer;
a: array [1..100] of integer;
begin
readln(n);
for i: =1 to n do
if i mod 2 =0 then a[i]: =i-3
else a[i]: =i+3;
writeln(a[i]);
end;
end.
-,андрей!
-,паша!
-как у тебя дела?
-у меня всё хорошо,а ты как?
-у меня всё отлично. что спросил
-не за что.пойдёшь сегодня гулять?
-да,конечно.а во сколько?
-в 5 часов.
-хорошо.ладно пока.
пока.встретимся на улице
-хорошо.
Популярные вопросы