Ответы на вопрос:
Pascal abc; var a,n,pr: longint; begin pr: =1; writeln('введите число n '); readln(n); for a: =1 to n do begin pr: =a*pr; end; writeln('произведение чисел от 1 до ',n,' = ',pr); end.
Популярно: Информатика
-
Какая из формул приведённых ниже может быть записана в ячейке с2 чтобы построенная...
ksu2608200212.12.2020 12:15 -
сделать 1, 2 задание Буду очеееень благодарна ❤️...
ddddsfvxsf24.11.2022 02:08 -
Составить программу и пояснение к задаче. 1. Даны два числа. Верно ли, что...
нануша45605.02.2020 18:49 -
Что из следующего относится к тестированию сайта, а что к его публикации?...
JukovaEleonora18.06.2021 22:56 -
Составьте программу, которая находит сумму всех четных чисел до 300....
Darya271218.04.2021 20:46 -
Решите пример по информатике mdccc+ccxiv=?...
tom029183746520.11.2020 17:02 -
Меттердің жалық- аттық модель: ньдық модель. h) комII с) ақпарат d) вербальд...
bikimbetovadarina03.01.2020 07:00 -
Записать программу по следующим условиям: Дан массив размером N. Вывести...
новиновичек11.03.2022 17:54 -
Проводилась одноканальная (моно) звукозапись с частотой дискретизации 8 кГц...
неумно12.11.2022 14:20 -
Сколько лет марио? А)35 Б)30 В)40 Г)другой ответ...
Алёнушка29013.07.2020 10:44