Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: klausimai

Parašė s1Nk· 2010 Rugs. 20 18:09:48
#95

Pasakykit kaip pakelt 9-tuoju laipsniu. Informatikos mokytojas sakė nereik jokiu for ir pnš. Pats uždavinys sakė susideda iš triju daugybos veiksmų.

Čia kaip aš isivaizduoju ta programa, bent kaškaus panašaus.


program Bevardė6;
var a,b,c:longint;
begin
  WriteLn('Iveskite a:');
  Read(a);
  WriteLn('Iveskite b:');
  Read(b);
  WriteLn(a*a, b*b, c*c);
  b:=a*a;
  c:=b*b;
  Readln;
end.