Решите программу Program test5; var i,n:integer; begin n:=0; for i:=1 to 90 do if i mod 2=0 then n:=n+1; writeln(n); end.

Лучшие за месяц

• 1
  Oksana Gordienko

  +798, 2 награды
• 2
  Bianca

  +743, 4 награды
• 3
  Monna

  +702, 2 награды
• 4
  Brawer

  +646, 3 награды
• 5
  Ольга М.А.

  +10.5K, 4 награды
• 6
  Kovaleva_08

  +522, 1 награда
• 7
  Serebro

  +495, 3 награды
• 8
  Laguna

  +489, 2 награды
• 9
  Katerina_kiev

  +441, 3 награды
• 10
  Мусиенко Денис

  +402, 2 награды