Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
НагецБлайзер
26.11.2022 15:00 •
Информатика
Написать программу, в которой функция вычисляет произведение целых чисел, не превышающих заданного пользователем числа n.
Показать ответ
Ответ:
tasn
13.08.2020 15:26
На чем писать?
Pascal:
var
Answer: Integer; //ответ
i, NSize: Byte; //счетчик и размер массива с числами Н}
begin
Answer:= 1;
Readln(NSize); // твой N
for i:=1 to NSize do
Answer:= Answer * i;
writeln(Answer);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
ordabaevabayan
04.06.2020 21:55
класс. Задача по информатике. Python. Дан целочисленный массив из 10 элементов, все элементы которого - целые числа в интервале от -1000 до 1000 Напишите программу, которая находит...
erasildamir
07.11.2022 12:06
Напишите программу которая будет вычислять площадь прямоугольника....
idkfndnf
09.01.2022 11:57
Улитка ползёт вверх по вертикальной стене в течение дня она поднимается на x см а за ночь пока спит сползает в низ на y см к тому же чем выше улитка тем сильнее сила тяжести заставляет...
agent687p0bqk2
03.05.2021 15:29
Решите данное задание...
razdor1996Rqzdor
21.02.2021 22:07
можете как можно быстрей...
Kusya2003
22.05.2022 14:13
Ученики 8 класса Алина, Егор, Костя и Ира ходят на факультативные занятия по информатике, математике, химии и физике. Известно, что каждый из этих ребят занимается только на одном...
tor142003
11.11.2021 18:37
0.В каком ряду на месте пропусков во всех словах пишется буква О? 1) Свеч..й, ч..ткий, свеж..го. 2) Ш...pox, лиц..м, камыш..вый. 3) Ситц..вый, девч..нки, свеж.. . 4) Певуч..,...
красав4ик007
02.01.2022 10:08
завтра сдавать надо контрольную а у меня не сделано ничего 2. Найдите значение выражения 1,5 · (6 – 1,6) 1) 4,4 2) 8,1 3) 7,4 4) 6,6 3. Вычислите 11 – 14 + 7 – 6 – 7 1) -3 2)...
didocfofiffi
02.01.2022 10:08
нужно придумать название к тексту. ...
olga170103
02.01.2022 10:08
Доведіть, що драматург надає величезного значення ролі освіти в житті людини. Поясніть цю думку на прикладі образу Лайзи....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Pascal:
var
Answer: Integer; //ответ
i, NSize: Byte; //счетчик и размер массива с числами Н}
begin
Answer:= 1;
Readln(NSize); // твой N
for i:=1 to NSize do
Answer:= Answer * i;
writeln(Answer);
end.