Помогите решить задачи на паскаль?

Информатика | 5 - 9 классы

Помогите решить задачи на паскаль.

1) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти произведение всех элементов массива.

2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти сумму четных элементов массива.

3) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти максимальный элемент массива.

4) Дан массив случайных чисел (количество элементов вводите с клавиатуры).

Найти максимальный элемент массива среди элементов, кратных 3.

Ответить на вопрос
Ответы (1)
OoSpiteoO 14 мар. 2020 г., 08:36:32

1)var a : array[0.

100] of integer ; i, s, n : integer ;

begin

writeln('Введите количество элементов в массиве : ') ; readln(n) ;

for i : = 1 to n do begin

a[i] : = random(10) ;

write(a[i], ' ') ;

s : = s * a[i] ;

end ;

writeln ;

writeln(s) ;

end.

2)var a : array[0.

100] of integer ; i, s, n : integer ;

begin

writeln('Введите количество элементов в массиве : ') ; readln(n) ;

for i : = 1 to n do begin

a[i] : = random(10) ;

write(a[i], ' ') ;

end ;

for i : = 1 to n do begin / / if (i mod 2 = 0) then s : = s + a[i] ; Раскоментируй, если сумму нужно искать среди четных номеров элементов.

/ / if (a[i] mod 2 = 0) then s : = s + a[i] ; Раскоментируй, если сумму нужно искать среди самих четных элементов.

End ;

writeln ;

writeln(s) ;

end.

3)var a : array[0.

100] of integer ; i, s, n, max : integer ;

begin

writeln('Введите количество элементов в массиве : ') ; readln(n) ;

for i : = 1 to n do begin

a[i] : = random(10) ;

write(a[i], ' ') ;

end ;

s : = 0 ;

for i : = 1 to n do begin

if (a[i]> ; s) then s : = a[i] ;

end ;

writeln ;

writeln(s) ;

end.

4)var a : array[0.

100] of integer ; i, s, n, max : integer ;

begin

writeln('Введите количество элементов в массиве : ') ; readln(n) ;

for i : = 1 to n do begin

a[i] : = random(10) ;

write(a[i], ' ') ;

end ;

s : = 0 ;

for i : = 1 to n do begin

if (a[i]> ; s) and (a[i] mod 3 = 0) then s : = a[i] ;

end ;

writeln ;

writeln(s) ;

end.

Ira20120 1 авг. 2020 г., 15:03:14 | 10 - 11 классы

Создать массив из пяти чисел вводом с клавиатуры и посчитать сумму элементов массива(в паскале)?

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

Наташа678 5 мар. 2020 г., 15:48:56 | 5 - 9 классы

Дан массив с 50 элементами?

Дан массив с 50 элементами.

Найти максимальный элемент массива.

Используйте для ввода элементов массива функцию Random(x).

Кубишка 18 июл. 2020 г., 12:57:53 | 10 - 11 классы

В массиве подсчитать : сумму чётных элементов?

В массиве подсчитать : сумму чётных элементов.

(Элементов массива : 7.

Массив вводится с клавиатуры).

Ksenia22111 8 июн. 2020 г., 11:23:19 | 10 - 11 классы

Помогите пожалуйста?

Помогите пожалуйста.

1. Дан массив (n * m).

Элементы массива ввести случайным способом.

Найти сумму элементов которые больше данного числа А.

Число А ввести с клавиатуры.

2. Дан массив (n * m).

Элементы массива ввести в программе.

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

3. Дан массив (n * m).

Элементы массива ввести с клавиатуры.

Найти количество четных элементов массива.

Ludmila0956 2 окт. 2020 г., 20:22:12 | 5 - 9 классы

Дан массив В размером 7 элементов, элементы вводятся с клавиатуры : а)найти произведение всех элементов массива б)заменить все положительные элементы на их кубы Помогите, пожалуйста, составить програм?

Дан массив В размером 7 элементов, элементы вводятся с клавиатуры : а)найти произведение всех элементов массива б)заменить все положительные элементы на их кубы Помогите, пожалуйста, составить программы, на языке Паскаль.

Дашуньяяя 4 дек. 2020 г., 08:21:00 | 10 - 11 классы

Найти максимальный элемент одномерного массива, содержащего А) 10 элементов ; Б) n элементов (число элементов массива вводится с клавиатуры) (в Qbasic)?

Найти максимальный элемент одномерного массива, содержащего А) 10 элементов ; Б) n элементов (число элементов массива вводится с клавиатуры) (в Qbasic).

IRINASTRELZ 27 нояб. 2020 г., 01:23:12 | 5 - 9 классы

PascalABC1)Дан массив целых чисел, состоящий из 8 элементов?

PascalABC

1)Дан массив целых чисел, состоящий из 8 элементов.

Заполнить его с клавиатуры.

Найти сумму элементов, имеющий нечётный индекс.

2)Сформировать одномерные массив из N элементов, где элементы массива - целые случайные числа.

Вывести индексы тех элементов, значение которых больше заданного числа A (A вводить с клавиатуры).

3)Определите, есть ли в данном массиве положительные элементы, кратные k (k вводить с клавиатуры).

Dmae 5 сент. 2020 г., 11:03:43 | 5 - 9 классы

ПОМОГИТЕ ПОЖАЛУЙСТА?

ПОМОГИТЕ ПОЖАЛУЙСТА!

СРОЧНО!

Задан линейный массив состоящий из n целых чисел.

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

Найти максимальный элемент массива и его индексный номер.

Найдите количество массива равный 4.

Найти сумму элементов массива.

Appland4569 19 нояб. 2020 г., 15:04:46 | 5 - 9 классы

3 ЗАДАЧИ НА ПРОГРАММИРОВАНИЕ В ПАСКАЛЬ ЗА 30 БАЛЛОВ1?

3 ЗАДАЧИ НА ПРОГРАММИРОВАНИЕ В ПАСКАЛЬ ЗА 30 БАЛЛОВ

1.

Задан массив А, состоящий из n чисел.

Найти среднее арифметическое его элементов.

Элементы вводятся с клавиатуры.

2. Найти сумму элементов массива с четными номерами, содержащего N элементов.

Элементы вводятся с клавиатуры.

3. Дан одномерный массив, значения элементов которого вводятся с клавиатуры.

Выяснить, каких элементов больше - положительных или отрицательных и насколько.

На экран вывести исходный массив и полученный результат.

Svetik1992 17 дек. 2020 г., 01:52:25 | 5 - 9 классы

В массиве состоящего из n элементов подсчитать количество положительных элементов больших чем k - вводится с клавиатуры?

В массиве состоящего из n элементов подсчитать количество положительных элементов больших чем k - вводится с клавиатуры.

Массив вводится случайным образом на [0 ; 20].

Паскаль!

Ребята срочно помогите.

На этой странице находится вопрос Помогите решить задачи на паскаль?. Здесь же – ответы на него, и похожие вопросы в категории Информатика, которые можно найти с помощью простой в использовании поисковой системы. Уровень сложности вопроса соответствует уровню подготовки учащихся 5 - 9 классов. В комментариях, оставленных ниже, ознакомьтесь с вариантами ответов посетителей страницы. С ними можно обсудить тему вопроса в режиме on-line. Если ни один из предложенных ответов не устраивает, сформулируйте новый вопрос в поисковой строке, расположенной вверху, и нажмите кнопку.