Информатика | 5 - 9 классы
Найти сумму n первых нечётных натуральных чисел.
(Паскаль).
Помогиииитееее?
Помогиииитееее!
На паскале
1.
Найти сумму первых 10 натуральных нечетных чисел.
2. Найти произведение натуральных чисел прекратить подсчет при вводе 1.
Составить программу вычисления суммы чётных чисел и произведение нечётных чисел от 1 до 10?
Составить программу вычисления суммы чётных чисел и произведение нечётных чисел от 1 до 10.
(через паскаль).
Напишите программу на Паскале?
Напишите программу на Паскале.
Дано натуральное число N.
Найти сумму квадратов всех натуральных чисел от 1 до N.
В одномерном массиве произвольных чисел найти количество нечётных элементов(паскаль)?
В одномерном массиве произвольных чисел найти количество нечётных элементов(паскаль).
Найти сумму 23 первых натуральных чисел, которые при делении на 8 дают остаток 5?
Найти сумму 23 первых натуральных чисел, которые при делении на 8 дают остаток 5.
В паскаль.
Составить программу на языке Паскаль нахождения суммы первых 20 натуральных чисел?
Составить программу на языке Паскаль нахождения суммы первых 20 натуральных чисел.
Найти сумму квадратов первых n натуральных чисел / ох, простите?
Найти сумму квадратов первых n натуральных чисел / ох, простите!
: DDD на языке паскаль.
Сумма нечетных 5 чисел на паскале Найти сумму 5 нечетных чисел натурально ряда n> ; 0?
Сумма нечетных 5 чисел на паскале Найти сумму 5 нечетных чисел натурально ряда n> ; 0.
Найти сумму первых 441 нечетных чисел (Паскаль)?
Найти сумму первых 441 нечетных чисел (Паскаль).
Найти сумму первых 441 нечетных чисел (Паскаль)?
Найти сумму первых 441 нечетных чисел (Паскаль).
Вы находитесь на странице вопроса Найти сумму n первых нечётных натуральных чисел? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 5 - 9 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Var n, i, a : integer ;
Begin Write('Введите число ') ; Readln(n) ; if n> ; = 1 then Beginwrite('Сумма нечётных чисел от 1 до ', n, ' = ') ; for i : = 1 to n do if ((i mod 2) < ; > ; 0) then a : = a + i ; write(a) ; End else write('Введено число меньше единицы') ;
End.