FPS- paskalio programa.

Ta vat.. Iskilo tokia beda. Nieko nesuprantu su FPS programa. O nd reikia padaryti butinai, bet pats nesugebeciau, tai gal kas galite padeti ? Buciau labai dekingas.. Jei esate geros sirdies ir turite laiko tai dar galetumete pamokyti pagrindus per skype halleluja2 ... Ačiū !

Reikia parasyti programa y didziaja puse:

program Minimumas;

var a, b, c, min : integer;

begin

Writeln ('Surinkite tris sveikuosius skaicius: ');

Read (a, b, c);

if a < b

then if a < c

then min := a

else min := c

else if b < c

then min := b

else min := c;

WriteLn ('Maziausia reiksme: ' , min);

end.

Turi omeny, jog parašytų didžiausią skaičių? Jei taip, tai:

program didziausias;

var a, b, c, max : integer;

begin

Writeln ('Surinkite tris sveikuosius skaicius: ');

Read (a, b, c);

if a > b

then if a > c

then max := a

else max := c

else if b > c

then max := b

else max := c;

WriteLn ('Didziausia reiksme: ' , max);

end.

Turi omeny, jog parašytų didžiausią skaičių? Jei taip, tai:

Aciu.. Isgelbejai.. Jei turi laiko gal per skype pamokytum pagrindus dar :) ?

Į google įrašyk pascal pradmenys ir rasi visko ko reikia :)

Man irgi reikia kas porą užduočių išspręstų. Moku per paypal po 1$ už vieną išspręstą.

Skype: mindaugas.br