Написать на паскале программу которая запрашивает с клавиатуры n произвольных целых чисел и ищет

Обновлено: 07.01.2025

Написать на Паскале программу, которая запрашивает с клавиатуры N произвольных целых чисел и ищет их сумму.

Число N вводится с клавиатуры.

Разработать для созданной программы не менее трёх тестов и проверить на них правильность работы алгоритма.

Var n, i, s, c : integer ;

for i : = 1 to n do / / сколько произвольных чисел будет.

readln(c) ; / / вводим произвольные числа

s : = s + c ; / / суммируем

writeln(s) ; / / Вывод суммы

Valerka1415 29 мая 2019 г., 05:29:21 | 5 - 9 классы

Программа Паскаль абс Определить, является ли число С средним арифметическим чисел А и Б (А, Б, С - вводятся с клавиатуры)?

Программа Паскаль абс Определить, является ли число С средним арифметическим чисел А и Б (А, Б, С - вводятся с клавиатуры).

Составьте программу , в которой осуществляется ввод трёх целых чисел с клавиатуры и вывод на экран монитора значения их суммы?

Составьте программу , в которой осуществляется ввод трёх целых чисел с клавиатуры и вывод на экран монитора значения их суммы.

Elizavetamila 8 июн. 2019 г., 01:35:21 | 5 - 9 классы

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

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

После этого пользователь вводит числа, а компьютер находит среднее арифметическое только для положительных чисел.

Nastyazayya 15 мар. 2019 г., 11:03:16 | 5 - 9 классы

Помогите написать программу которая вычисляет сумму положительных из n введенных с клавиатуры целых чисел (FOR) В паскале ABC?

Помогите написать программу которая вычисляет сумму положительных из n введенных с клавиатуры целых чисел (FOR) В паскале ABC.

Elaycherep 31 мая 2019 г., 03:34:30 | 10 - 11 классы

Напишите алгоритм программы, которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение?

Напишите алгоритм программы, которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение.

ValerovaLirashonov 23 июл. 2019 г., 18:45:34 | 5 - 9 классы

Помогите?

С клавиатуры последовательно вводятся десять чисел.

Написать программу на паскале, которая вычислит и выведет на экран сумму чисел, кратных 3.

С клавиатуры вводится число N.

Написать программу, которая вычислит и выведет на экран все его делители.

Lemashkaaleske 11 апр. 2019 г., 10:43:17 | 10 - 11 классы

Разработать алгоритм, программу и тест?

Разработать алгоритм, программу и тест.

Дана последовательность из 50 - ти чисел.

Определить есть ли в последовательности числа кратные заданному с клавиатуры числу С.

Imuratshin 18 сент. 2019 г., 05:04:25 | 5 - 9 классы

На паскале написать программу сокращения дроби , где N – целое, M – натуральное число?

На паскале написать программу сокращения дроби , где N – целое, M – натуральное число.

Использовать алгоритм Евклида.

Разработать тесты для проверки правильности работы программы.

На паскале написать программу сокращения дроби , где N – целое, M – натуральное число?

На паскале написать программу сокращения дроби , где N – целое, M – натуральное число.

Использовать алгоритм Евклида.

Разработать тесты для проверки правильности работы программы.

Frfruffhrurftvgbftgh 5 мая 2019 г., 10:34:43 | 10 - 11 классы

Дана произвольная квадратная матрица (вводится с клавиатуры), посчитать сумму элементов находящихся на главной диагонали?

Дана произвольная квадратная матрица (вводится с клавиатуры), посчитать сумму элементов находящихся на главной диагонали.

Нужна программа написанная на паскале!

Правильный ответ под буквой А.

Пока i < 5 a = 12 + 2 = 14 i = 2 + 1 = 3 пока 3 < 5 a = 14 + 3 = 17 i = 3 + 1 = 4 пока 4< 5 a = 17 + 4 = 21 i = 4 + 1 = 5 Ответ : 21.

1001011_2 = 75_10 51_8 = 41_10 4A_16 = 74_10 51_8 - - > 4A_16 - - > 1001011_2.

Калькулятор для продажи.

Norton WinDoctor Norton Unerase Wizard Norton Rescue Disk Norton System Information NORTONUtilities Integrator в общем программы, а также встроенные в Windows "Программа проверки диска" "Программа очистки диск" "Ошибки файловой системы" "Программа де..

Uses GraphABC ; begin LockDrawing ; for var i : = 1 to 800 do begin Window. Clear ; Brush. Color : = clGray ; FillRectangle(i + 10, 90, i - 110, 430) ; Brush. Color : = clRed ; Ellipse(i, 100, i - 100, 200) ; Brush. Color : = clYellow ; Ellipse(i..

Музыкальные редакторы обучающие программы компьютерные игры программы статических расчетов сетевые программы.

Читайте также: