Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
deniskamikhalcozvly4
18.10.2021 21:51 •
Информатика
Нужно сделать в паскале: составьте программу, составьте программу, которая вычисляет произведение чисел от 1 до n. где n вводится с клавиатуры.
Показать ответ
Ответ:
вика134475
05.07.2020 10:50
Var p,i, n:integer;
begin
p:=1;
writeln('Введи n');
readln(n);
if n>=1 then
begin
for i:=1 to n do
p:=p*i;
writeln(p);
end else writeln('n>=1');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
даша3602
08.08.2021 18:11
Найти сумму двух двоичных чисел 01101 и 001101 равна?...
Lovedashuta
08.08.2021 18:11
Надпись на клавише, перевобящаяся на язык как пауза...
ПочтиОтличникМакс
29.06.2022 23:38
Дан текст из 450символов. Известно, что символы берутся из 32символьного алфавита. Каков вес данного текста в байтах?...
Полина20351
20.04.2021 15:28
Разработать на Паскаль программу для вычисления:1) значения заданного арифметического выражения2) значения заданной функции c = x^2+y^2+sin(x), при x-y=0;(x-y)^2+cos(x), при 0...
Кукушка1199
31.12.2021 08:53
информатика⬆️⬆️⬆️⬆️⬆️⬆️⬆️⬆️⬆️⬆️ ...
orehova217021970
28.10.2021 16:31
Напишите программу в паскале подсчитать кол-во малых букв латинского алфавита в строке у которых буквы стоящие рядом совпадают и найти какие из этих символов встерчается чаще всего....
ILYA3421
04.05.2020 08:56
Что такое презентация? Для чего нужны презентации? ...
Kurakik
24.10.2020 06:34
Задания по информатике решить...
Ivanpomogite228
19.12.2021 14:23
Слова можна утворювати з букв, розташованих у таблиці. Починати слово можна з будь-якої клітинки. Внизу у поточній клітинці вказанаадреса наступної літери слова. Слово повинне закінчуватись...
1Sn1KeRS11
17.07.2021 13:13
Определите наименьшее количество цифр, которое необходимо использовать для составления не менее 200 различных пятизначных чисел....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
p:=1;
writeln('Введи n');
readln(n);
if n>=1 then
begin
for i:=1 to n do
p:=p*i;
writeln(p);
end else writeln('n>=1');
end.