Пожалуйста помогите решить

1) увеличить число x в 2 раза, если оно отрицательное, во всех остальных случаях уменьшить его на 5

2) В сберкассу на депозит положили 75000 тенге. Какой станет сумма вклада через 10 лет при 11% годовой ставке.

1

Ответы и объяснения

2013-04-25T20:07:32+04:00

Предыдущее не совсем точно

Program 1;

var x,a:integer;

begin

writeln ('x=')

readln (x);

if x<0 then a:=x*2 esle a:=x-5;

writeln('a='a);

end.

Вот так будет