Предмет:
ИнформатикаАвтор:
lorenavaldezАвтор:
maximusmccoyprogram raf105;
var n,i,pro: integer;
begin
write('N = ');
readln(n);
pro:= 1;
for i:=1 to n do
begin
write(i,' ');
pro:= pro * i;
end;
writeln;
writeln('Произведение: ',pro);
end.
PascalABC 3.4.2Автор:
patsyДобавить свой ответ
Предмет:
ОбществознаниеАвтор:
angelica22Ответов:
Смотреть
Предмет:
ГеографияАвтор:
victorinofjjsОтветов:
Смотреть
Предмет:
МатематикаАвтор:
maiahutchinsonОтветов:
Смотреть