Parašė Žmogus· 2012 Bal. 12 19:04:56
#7
Kižas parašė:
Hs parašė:
Readln(n);
Sk:=1;
While n <> sk do
Begin
A:=a*sk;
Sk++;
End;
Klaidas išsitaisysi, su fps nk nemoku, programuoju su c++. Be to rašiau per tlf.
Ką tu čia puliuoji ? Taigi parašiau jau gerą programą, o iš tavo parašytos programos tai tik kažkoks c++ ir pascal kratinys.
Nope, sk++; veikia ir ant pascal