Pascal príklad - pomoc – Pascal – Fórum – Programujte.com

Ahojte, ľudia mal by som na vás jednu otázku. V škole som dostal príklad na vypracovanie, ktorý máme spraviť v pascali no ja si neviem vôbec poradiť s tým príkladom a horšie je to že príklad sa bude nachádzať aj na maturite. Bol by som nesmierne šťastný ak by mi niekto príklad spravil a tak by ma zachránil pred zbytočnými problémami. Zadanie príkladu: Napíšte program, ktorý vypočíta, koľko špeciálnej tkaniny treba na prekrytie návesu kamióna, ktorý má
rozmery: výška 4 m, šírka 2.5 m a dĺžka 16.5 m. S pozdravom Robo.

#1 Robo
Dont worry, be happy...

Program Kamion;
begin
  writeln('Náves kamióna: výška 4 m, šírka 2.5 m a dĺžka 16.5 m');
  writeln('špeciálnej tkaniny na prekrytie návesu treba 193,25 metrov štvorcových');
end.

#12. maturita za mnou. Nezkousel jsem a psal z voleje.....doufam, ze to pujde zkompilovat.....Dej pak vedet, jestli jsi udelal maturitu.

Program Kamion;

const 

vyska = 4;

delka = 16.5;

sirka = 2.5;

var 

vysledek : real;

begin

vysledek := (2*(vyska * delka) + 2*(vyska * sirka) + 2*(delka * sirka)) - (sirka * delka);

writeln('Vysledek: ',vysledek:3:2);

end.