Регистрация
denmalyshevs
31.08.2020 03:13
Информатика
Есть ответ 👍

Напишите в pascal программу: по заданному целому неотрицательному значению n вычислить n! = 1*2*3* n.

101
115
Посмотреть ответы 2

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

gigeriti28391vlad
gigeriti28391vlad
4,4(13 оценок)
Var  i,n,a : int64; beginreadln(n); a: =1; for i : = 1 to n doa: =a*i; write(a); end.
ДашаНифонтова
ДашаНифонтова
4,8(96 оценок)

var

a,b,c,max:integer;

begin

read(a,b,c);

if a > b then

max:=a

else

max:=b;

if max > c then

write(max)

else

write(c);

end.

Популярно: Информатика