Вход
Регистрация
О проекте Как заработать?
33

Создать в Паскале программу подсчета произведения N последовательных…

kudart98 30 марта 2023

Создать в Паскале программу подсчета произведения N последовательных натуральных чисел начиная содного!

категория: информатика
ответить
в избранное

80

program p; var n,i,o: integer; begino: =1; writeln ('Введите колчиство чисел: '); readln (n); for i: =1 to n do o: =o*i; writeln ('Ответ: ',o); readln; end.

пользователи выбрали этот ответ лучшим
комментировать
в избранное ссылка отблагодарить

Знаете другой ответ?
Другие вопросы по информатике
witalikm
30 марта 2023
1
ответ
Даны вещественные ненулевые числа x, y. Если они имеют разные знаки, то отрицательное заменить его абсолютным значением. В противном случае оба числазаменить на число 100.
daniar
30 марта 2023
1
ответ
1. Разработать схему алгоритма для ввода четырех целых чисел и вычисления их среднегоарифметического.
revere
30 марта 2023
1
ответ
A01: Что изменяет операция присваивания? 1) значение переменной 2) имя переменной 3) тип алгоритма
maximumboy
30 марта 2023
1
ответ
Какие значения примут переменные с и d после выполнения следующего фрагмента программы: c: =1; d: =1; while с <= 5 do begin d: =d*c; c: =c+1; end;
spike
30 марта 2023
1
ответ
Написать програму вичисляющюю сумму и среднее арифметическое нескольких чисел которые вводитпользовательПомогите пожайлуста: *
happosai
30 марта 2023
1
ответ
Нарисовать несложный (может быть кому задавали) пейзаж в Паскле ABC.
webdm
30 марта 2023
1
ответ
Запиши несколько действий, которые выполняет компьютер? 2) компьютер установлен в отделениимилиции.
youngpro
30 марта 2023
1
ответ
Помогите составить блок схему к программе паскаль. var a,b: Real; begin Read (a,b); if (a < 0) then a: =(-a) else a: =a+0,5; if (b < 0) then b: =(-b) else b: =b+0,5; WriteLn (', a,', b); end.
x-files
30 марта 2023
1
ответ
Ребят помагите пожалуста решить буду блогадарен всю жизнь построить график уравнения-3 х +2 у=-6 и на нем найти точку абцисса которойравна 4
Задайте свой вопрос

ПОПУЛЯРНОЕ
witalikm, 30 марта 2023
Даны вещественные ненулевые числа x, y. Если они имеют разные знаки, то отрицательное заменить его абсолютным значением
daniar, 30 марта 2023
1. Разработать схему алгоритма для ввода четырех целых чисел и вычисления их среднегоарифметического
revere, 30 марта 2023
A01: Что изменяет операция присваивания?
maximumboy, 30 марта 2023
Какие значения примут переменные с и d после выполнения следующего фрагмента программы: c: =1; d: =1; while с?
spike, 30 марта 2023
Написать програму вичисляющюю сумму и среднее арифметическое нескольких чисел которые вводитпользовательПомогите…
happosai, 30 марта 2023
Нарисовать несложный (может быть кому задавали) пейзаж в Паскле ABC
webdm, 30 марта 2023
Запиши несколько действий, которые выполняет компьютер?
youngpro, 30 марта 2023
Помогите составить блок схему к программе паскаль
x-files, 30 марта 2023
Ребят помагите пожалуста решить буду блогадарен всю жизнь построить график уравнения-3 х +2 у=-6 и на нем найти точку…
27400
Алгебра
14821
Английский язык
14216
Биология
7369
Другой
720
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11818
История
23332
Химия
15992
Литература
73118
Математика
8152
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...