Var x,y:real;
begin
read (x,y);
if (x<0) and (y<0) then writeln (abs(x),' ',abs(y)) else
if ((x<0) and (y>=0)) or ((y<0) and (x>=0)) then writeln (x+27,' ',y+27) else
if (x>=0)and (y>=0) then writeln (x-20,' ',y-20);
end.
Да и все цифры могут быть четными:)))
Незнайка купил - 20 литров горючего
Винтик и Шпунтик - 20 литров горючего
Торопыжка - 25 литров горючего
Цветик - 20 литров горючего
Сколько это стоило неизвестно,так как цены не указаны.
Кока-кола была закуплена в объеме 20 литров
Лимонад в объеме 25 литров
Фанта в объеме 45 литров
Сколько можно проехать на таком горючем нельзя подсчитать,так как нет данных и расходе такого "бензина " за час дороги.Если брать значение 1км/1литр - то можно проехать 85 км.
8. Запишите следующие высказывания в форме логических выражений:
а) фамилия >< Семенов;
б) занятие = геология
в) дата рождения < 5.05.1989
г) дата <= 23.09.1996
д) алгебра >< отлично;
е) автор книги = Беляев А.Р.;
ж) год издания <=1990
з) место нахождения >=3