Pascal programavimas

sweiki gal kas galetu padeti naujokui pascal programavime niekaip negaliu sukurti dvieju programu .. gal kas kuris zino apie sita dalyka galetu man padet bent pirma programa sukurti buciau ziauriai dekingas

http://img849.imageshack.us/img849/6366/20120522171538.jpg

Argi buvo taip sunku pamatyti? http://www.playmanija.lt/forumas/t24962/namu-darbai-mokslai/page__st__135

programavimopamokos.net

O ta pirma programa tai sakyčiau va:

program plotas;
var s,h,a:integer;
begin 
  Writeln('Ivesk trikampio pagrindą a');
  Readln(a);
  Writeln('Ivesk aukštinę h');
  Readln(h);

  s:=0,5*a*h;
  Writeln('Plotas : ',s);
  Readln();
end.

Antrą pats pasidaryk.