Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
иван-занимается легкой атлетикой,петр-баскетболом, алексей-хоккеем, андрей-футболом
954-459=495
var i,n,s: nteger;
begin
read(n);
for i : = 1 to n do
if i mod 2 = 0 then s: = s-1/i;
else s: = s+1/i;
writeln(s);
end.
var i: integer;
for i: = 35 to 87 do
if i mod 7 =1 then
writeln(i);
Популярные вопросы