Директор узнал то что это мог сделать 1 из 100 учеников
14, у меня это в олимпиаде попалось))))
по алгоритму евклида:
var a,b:integer;
begin
readln(a,b);
repeat
if a>b then
a:=a mod b
else
b:=b mod a;
until (a=0) or (b=0);
writeln(a+b);
end.
-------------------------
var a,b:integer;
begin
readln(a,b);
while (a<>0) and (b<>0) do
if a>b then
a:=a mod b
else
b:=b mod a;
writeln(a+b);
end.
It is a quarter past ten 10:45
it is twenty minutes to twelve 11:40
it is a quarter to twelve 11:45
it is ten minutes to four p.m 15:50
"акинукыл" - Каникулы
"евнса" - Весна
"етеливроз" - Телевизор
;)