Ручка стоит k рублей, к 1 сентябрю она подорожала на p%. Определите, сколько ручек можно купить на s рублей после подорожания.

Составить программу на Pascal.

Question

Серж

4 сентября, 01:33

+3

Ответы (1)

Знаете ответ?

Панюха · Answer 1

Var a, k, s, p: real;

begin

readln (k, s, p) ;

a:=s / (k+k * (p/100)) ;

writeln (a) ;

end.

Ручка стоит k рублей, к 1 сентябрю она подорожала на p%. Определите, сколько ручек можно купить на s рублей после подорожания.Составить программу на Pascal.