напишите программу, которая выводит на экран значение n! включая следующую функцию function factorial (n:integer):integer; var p,i:integer; begin p:=1; for i:=1 to n do p:=p*i; factorial:=p; end;
Предмет:
ИнформатикаАвтор:
camilorussellProgram p1;
uses crt;
function factorial (n:integer):integer; var p,i:integer; begin p:=1; for i:=1 to n do p:=p*i; factorial:=p; end;
var n:integer;
begin
Write('Введите число, n=');
Readln(n);
Writeln('Факториал = ',factorial(n));
end.
Автор:
kelly50Добавить свой ответ
Докажите, что 1 Вт•ч = 3600 Дж.
Текст называется "Как дарить подарки". Совтавь текст по плану. План. 1)Как выбирать подарок 2)Как дарить подарок 3)Какие слова нужно говорить, когда даришь подарок
Предмет:
Русский языкАвтор:
dirty harry6a2jОтветов:
Смотреть
Разобрать по членам предложения:
Спешат домой перелётные птицы.
Разобрать по составу слово:
нарядный, бегает.
Указать падеж существительных в предложении:
У лесного оврага цветут ландыши и земляника.
Предмет:
Русский языкАвтор:
butchyОтветов:
Смотреть
Однажды маленький котёнок решил погулять. Он решил, что прогулка будет интересней, если он погуляет ночью. Когда пришла ночь, он пошёл гулять. Сначала, бесшумно ступая мягкими лапками, он пошёл на кухню. На кухне он решил, что нужно проверить, что лежит на столе. Исправьте неоправданные повторы в тексте, используя синонимические и местоимённые замены.
Предмет:
Русский языкАвтор:
claireekl8Ответов:
Смотреть