Информатика | 5 - 9 классы
Нужно составить программу в Pascal ABC с использованием цикла.
Условие : Вычислите сумму данных N натуральных чисел.
Входные данные Вводится число N, а затем N чисел, сумму которых необходимо вычислить.
Выходные данные Выведите единственное число - сумму введенных чисел.
Выведите все точные квадраты натуральных чисел, не превосходящие данного числа N?
Выведите все точные квадраты натуральных чисел, не превосходящие данного числа N.
Формат входных данных Задано единственное число N.
Формат выходных данных Необходимо вывести все точные квадраты натуральных чисел, не превосходящие данного числа N.
Вычислите сумму данных N натуральных чисел?
Вычислите сумму данных N натуральных чисел.
Входные данные Вводится число N, а затем N чисел, сумму которых необходимо вычислить.
Выходные данные Выведите единственное число - сумму введенных чисел.
В Pascal ABC.
Решить задачу на Паскале : Вычислите сумму данных 100 натуральных чисел?
Решить задачу на Паскале : Вычислите сумму данных 100 натуральных чисел.
Вводятся 100 чисел, сумму которых необходимо посчитать.
Помогите очень срочно?
Помогите очень срочно!
315. По данному натуральному n вычислите сумму 1 ^ 2 + 2 ^ 2 + .
+ n ^ 2.
Вводится единственное число n.
Необходимо вывести вычисленную сумму.
346. Подсчитайте, сколько среди данных N чисел нулей, положительных чисел, отрицательных чисел.
Вводится число N, а затем N чисел.
Необходимо вывести сначала число нулей, затем число положительных и отрицательных чисел.
347. Вводится число N, а затем N чисел.
Выведите YES, если среди введенных чисел есть хотя бы один нуль, или NO в противном случае.
ЛЮДИ ДОБРЫЕ ПОМОГИТЕ?
ЛЮДИ ДОБРЫЕ ПОМОГИТЕ!
25баллов Выведите все точные квадраты натуральных чисел, не превосходящие данного числа N.
Входные данные Задано единственное целое число N Выходные данные Необходимо вывести все точные квадраты натуральных чисел, не превосходящие данного числа N.
Примеры входные данные 15 выходные данные 1 4 9.
Проверьте, есть ли среди данных N чисел нули?
Проверьте, есть ли среди данных N чисел нули.
Входные данные Вводится число N, а затем N чисел.
Выходные данные Выведите YES, если среди введенных чисел есть хотя бы один нуль, или NO в противном случае.
Примеры входные данные 3 4 19 14 выходные данные NOПроверьте, есть ли среди данных N чисел нули.
Входные данные Вводится число N, а затем N чисел.
Выходные данные Выведите YES, если среди введенных чисел есть хотя бы один нуль, или NO в противном случае.
Примеры входные данные 3 4 19 14 выходные данные NO Выполнять на python 3.
3 Очень нада.
Дан массив из 20 натуральных чисел?
Дан массив из 20 натуральных чисел.
Составить программу суммы элементов, кратных данному числу d .
Дано несколько чисел?
Дано несколько чисел.
Вычислите их сумму.
Сначала вводите количество чисел N, затем вводится ровно N целых чисел.
Дано натуральное число N?
Дано натуральное число N.
Напишите функцию (Pascal), вычисляющую сумму цифр числа N.
Входные данные
Задано единственное число N
Выходные данные
Необходимо вывести сумму цифр числа N.
Примеры
входные данные
12
выходные данные
3
ПРОГРАММА БЫЛА, НО ВВОДИЛ 12 И ВЫВОДИЛ ВМЕСТО 3, 0.
1. Дано несколько чисел?
1. Дано несколько чисел.
Подсчитайте, сколько из них делятся на 3 и 2, и выведите это количество.
Входные данные
Cначала вводится число N, затем вводится ровно N целых чисел.
Выходные данные
Выведите ответ на задачу.
Написать программу на python!
Вы находитесь на странице вопроса Нужно составить программу в Pascal ABC с использованием цикла? из категории Информатика. Уровень сложности вопроса рассчитан на учащихся 5 - 9 классов. На странице можно узнать правильный ответ, сверить его со своим вариантом и обсудить возможные версии с другими пользователями сайта посредством обратной связи. Если ответ вызывает сомнения или покажется вам неполным, для проверки найдите ответы на аналогичные вопросы по теме в этой же категории, или создайте новый вопрос, используя ключевые слова: введите вопрос в поисковую строку, нажав кнопку в верхней части страницы.
Var i, n, s, t : integer ;
begin Read(n) ; s : = 0 ; for i : = 1 to n do begin Read(t) ; s : = s + t end ; Writeln(s)
end.