Программа в паскале! Помогите пожалуйста! В Митиной библиотеке N книг по...

Question

Программа в паскале! Помогите пожалуйста!
В Митиной библиотеке N книг по программированию, сборников фантастики - в 4 раза больше, чем книг по программированию, а сказок – на 12 меньше, чем сборников фантастики. Сколько всего книг в Митиной библиотеке?

Comments

еще надо?

---

книг по програмированию известно сколько?

---

ечли известно ,то задачу я уже решил

Answer 1

Uses crt;

var
n,f,p,s:integer;
begin
textbackground(15);
textcolor(1);
clrscr;
writeln('введите сколько книг по програмированию ');
readln(p);
f:=p*4;
s:=f-12;
n:=f+s+p;
writeln('всего ',n,' книг');
end.