Боря, витя, гриша и егор встретились на всероссийской олимпиаде по информатике. приехали из разных городов: москвы , омска, санкт-петербурга и кирова. известно что боря жил в одной комнате с мальчиком из кирова и ни один из этих двух мальчиков никогда не был ни в москве, ни в санкт-петербурке. гриша играл в одной комнате с мальчиком из москвы, а вечерами к ним заходил приятель из кирова. егор и мальчик из москвы увлекаются игрой в шахматы . кто из откуда приехал?

p - произведениеs - суммаi - цикловая переменная1. цикл с предусловием whilevarp, s, i : longint; [или integer]beginp : = 1; s : = 0; i : = 101; while i < 200 dobeginif i mod 5 = 0 thenbeginp : = p * i; s : = s + i;   end; i : = i + 1; [или ing(i)]end; writeln(p); writeln(c)end.2. цикл с постусловием repeat varp, s, i : longint; [или integer]beginp : = 1; s : = 0; i : = 101; repeatif i mod 5 = 0 thenbeginp : = p * i; s : = s + i;   end; i : = i + 1; [или ing(i)]until i > = 200; writeln(p); writeln(c)end. 3. цикл for varp, s, i : longint; [или integer]beginp : = 1; s : = 0; for i : = 101 to 199 dobeginif i mod 5 = 0 thenbeginp : = p * i; s : = s + i;   end; end; writeln(p); writeln(c)end.

на каком япе? вот пример решения на паскале abc.

program test;

var s: string;

begin

  read(s);

  write(s);

end.