A kocka felszin terfogata egy prgramban illetve külön átlagszámítást pascalba én 1 orát szerencsétlenkedtem vbvel hogy kel helyesen hogy lefusson? (Fontos! )

pastebin/4dHT15gD

Így néz ki igényesebben.

A kocka térfogata: a*b*c

Felülete: 2*(a*b+a*c+b*c)

Kör területe: r^2*pi

Kerülete: 2*r*pi

Mi olyan átkozottul nehéz egy kocka felszínének és térfogatának kiszámításában?

Ennyi a kód (lévén a kocka minden oldala egyforma hosszú):

program kocka;

var oldal:integer;

begin

write('Kérem a kocka oldalának hosszát: ');

readln(oldal);

writeln('Térfogat: ',oldal*oldal*oldal);

writeln('Felszín: ',2*(3*(oldal*oldal)));

end.