вычислить и вывести произведение квадратов чисел натурального ряда от 3 до N (паскаль) Помогите пожалуйста очень срочно надо!!!
10-11 класс
|
var
res : int64;
i, n : integer;
begin
res := 1;
for i := 3 to n do
res := res * sqr (i);
writeln (res);
end.
Другие вопросы из категории
решение можно?
Ниже записана программа. Получив на вход число x, эта программа печатает два числа, L и M. Укажите наименьшее из таких чисел x, при вводе которых алгоритм печатает сначала 3, а потом 28.
var x, L, M: integer;
begin
1) система обработки изображений документов
2) система управления документами
3) система автоматизации деловых процедур
4) система оптического распознавания символов
Читайте также
Дана матрица А[8,8] четных чисел натурального ряда (от 2 до 128).
1)Заполнить и записать матрицу.
2)Определит число элементов больших 18 и меньших 60. заменить их на 0.затем записать получившуюся матрицу.
3)Определить произведение главной диагонали и вывести эти элементы на экран.
4)Реализовать определение суммы элементов любого столбца.
Спасибо.
оно четным или отрицательным.(Паскаль)
Или так: Из 16 -ти чисел,сделайте для каждого вывод,является ли оно четным или отрицательным .(Паскаль)
Помогите пожалуйста,оченьььь срочно надо!Буду благодарна за решение ,спасибо!!!!!!!
представьте в двоичной системе счисления.
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE