
19.03.2010, 22:15
|
|
Участник форума
Регистрация: 07.02.2010
Сообщений: 189
Провел на форуме: 870084
Репутация:
79
|
|
Эмм а что тут непонятного?
Код:
var
x,y:real;
begin
read(x);
if (x<7)and(x>6) then
y:=5*x+6;
if (x>7)and(x<10) then
y:=2*x
else
y:=9;
writeln(y);
end.
|
|
|