Составить программу, вычисляющую факториал числа n. (n! = 1·2·3·…·n) 3 цикла

//pascal abc.net v3.0 сборка 1111 //for var   i,n,r: integer; begin   readln(n);   r: =1;   for i: =1 to n do   r: =r*i;   write(r); end.//whilevar  i,n,r: integer; begin  readln(n);   r: =1;   i: =0;   while i< > n do  begin;     inc(i);     r: =r*i;   end;   write(r); end.//repeatvar  i,n,r: integer; begin  readln(n);   r: =1;   i: =0;   repeat    inc(i);     r: =r*i;   until n=i;   write(r); end.

в секунду передается 512кбит=512/8кбайт=64кбайт

за четыре минуты передалось 4*60*64=15360кбайт

в одном мбайте 1024 кбайт ⇒15360кбайт=15360/1024мбайт=15мегабайт

ответ: 15 мегабайт

program primitive;

var a,b: integer;

begin 

read(a,b);

writeln(a mod b);

end.чему в школе то