Pascal =)

Help! Или просто дайте хоть паскаля =))

Вот задачки, которые надо сделать в паскале:


1. Вычислите выражения y=(x2+7)+z/12. X и Z вводится с клавиатуры.

2. Нужно купить обои для для оклеивания двух стен, размером axb м каждая. Известна стоимость одного рулона обоев длиной 12 м и шириной 1 м Определите стоимость обоев.(Вводится с клавиатуры)

Оформить отчет в тетради, задание и блок-схемы перечертить в тетрадь, результат показать преподавателю.

ABC, т.к поудобнее будет, да и там есть примеры

1.
var
x,y,z:real;
begin
write('vvedite x: ');
readln(x);
write('vvedite z: ');
readln(z);
y:=(sqr(x)+7)+z/12;
writeln('otvet: ',y:2:2);
end.

2.
var
a,b,ss,kol:integer;
st,cena:real;
begin
write('vvedite a: ');
readln(a);
write('vvedite b: ');
readln(b);
write('vvedite cenu odnogo rulona: ');
readln(cena);
ss:=a*b*2;
kol:=ss div 12;
if (ss mod 12)>0 then kol:=kol+1;
st:=cena*kol;
writeln('otvet: ',st:2:2);
end.