Как записать в паскаль n!(факториал). А так же как записать очень надо

172

336

Посмотреть ответы 1

Ответы на вопрос:

Zaya191

Информатика

4,7(37 оценок)

1) var n,z: integer; begin z: =0; //z=: 0 знак присваивания выглядит вот так ": =" //n=: 100 - не нужно иницилизировать параметр цикла. for n: = 200 to 500 do begin //for n: =100 to 1000 do begin - цикл должен идти от 200 до 500, а не со 100 до 1000 if n mod 14 = 0 then //if (n div 14 =0) then - div - целая часть от деления, а mod - остаток. z: =z+1; //writeln(n); - выводить n не нужно совсем, а вот увеличить счетчик не помешает //z: =z+1; - а вот тут уже лишнее end; writeln(z); end. 2) -73, выполнится 15 - 8 + 1 = 8 раз