<span>Скорость передачи данных по локальной сети 37 Mбит в секунду. Ученик скачал игру за 58 минут. Каков объём скачанной информации в Кбайтах? </span>
Var a,b,c:integer; l:boolean;
begin
writeln('a, b, c:');
readln(a,b,c);
l:=(a=-b)or(a=-c)or(b=-c);
if l then writeln('Yes') else writeln('No');
end.
Пример:
<span>a, b, c:
5 8 -5
Yes</span>
Бег......Шаг
бег - Бог - бок - бак - мак - маг -шаг