Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Užduotys / Klausimas / Atsakymai

Parašė IGEN· 2011 Lap. 14 17:11:44
#8

2) Uždavinys [BAIGTA]


program Noname0;
var sk, i: longint;    // kintamieji
mas : array [1..5] of longint;      // sukuriamas masyvas
begin
  Read(sk);      // irasomas penkiazenklis skaicius
  for i:= 1 to 5 do      // ciklas kuris padeda skaidyti skaiciu
  begin                  // ciklo pradzia
  mas[i]:= sk mod 10;     // skaidymas
  sk:= sk div 10;         // skaidymas
  end;                   // ciklo pabaiga
  Write(mas[5],mas[4],mas[2],mas[1]); // rasomas skaicius be vidurinio
  Readln;
end.


Labai patiko ačiū ZygisN
Laukiu dar.

Redagavo IGEN· 2011 Lap. 14 18:11:43