Profesionālie tulkošanas pakalpojumi. 5
Pardod: MSI GeForce RTX 2080ti gaming X TRIO Graphic Card 1
Vēlos piedāvāt darbu online. 0
OCTA termiņš 13
Ka sauc Pasaules dalu kura dzivojam 4
google 1
Taustiņu funkcijas izmainīšana 2
Torrent 1
Cik maksā šodien kārtigs Gamer PC? 4
ESET izlaiž 2017.gada produktu izdevumus 23
VIAPLAY: Video tiešsaistē skatās 70% Latvijas iedzīvotāju 21
Katrā desmitajā datorā joprojām izmanto Windows XP 2
Google tuvākajā laikā atteiksies no Chrome paplašinājuma palaidēja 2
Acer ievieš nozares pirmo ieliekto monitoru ar acu izsekošanas funkcionalitāti 4
Adobe laiž klajā ārkārtas atjauninājumu 3
Tests: Cik precīzs ir "lēta gala" velo spidometrs? 3
Leģendārie telefoni – Nokia 3310 un citi 3
Puisis iziet Super Mario spēli mazāk kā piecu minūšu laikā un labo pasaules rekordu 2
Līdz 29.jūlijam atjaunini savu Windows bez maksas! 3
Kā uzlabot televizora skaņu? 2
Programma, ar kuras palīdzību fotogrāfijas pārveidot .gif formātā 1
Aproce, kas sastāv no 25 instrumentiem 1
Trīs padomi televizora izvēlei 2
Windows 7 ēra tuvojas noslēgumam, Microsoft koncentrējas uz Windows 10 1
Lietotāji online: 56
Reģistrētie lietotāji online: 0
Viesi online: 56
Labdien! Vai kāds varētu palīdzēt izlabot kļūdu?
Uzdevums ir tāds:
1) programma aprēķina skaitļa n faktoriālu (visu naturālo skaitļu no 1 līdz n reizinājumu). Skaitļa n faktoriālu apzīmē ar n!, piemēram, 3! = 1 · 2 · 3 = 6. Skaitli n (mazāku par 11) ievada ar tastatūru;
2) mainīgos norādīt apraksta daļā, mainīgajiem piešķirot identifikatorus un izvēloties atbilstošu tipu (faktoriāla mainīgajam tipu longint).
program faktorials;
var
n: integer;
f: longint;
begin
write('Ievadiet veselu pozitivu skaitli: ');
readln(n);
n:=0;
f:=1;
while n<11 do
n:=n-1;
f:=f*n;
writeln('Skaitla ',n, ' faktorials ir ',f);
readln;
end.
Paldies jau iepriekš!
Kāpēc prasi ievadīt lietotājam kaut ko, ja nākošajā rindiņā norādi 0. Un while cikls tev izpildīs tikai 1. rindiņu.