Помогите пожалуйста написать программу на паскале : дан массив целых чисел?

9zyzx8 22 окт. 2020 г., 22:58:09

PROFIT?

Program lol ;

var

mas : array[1.

20] of integer ;

max, min, i : integer ;

begin

randomize ;

for i : = 1 to 20 do

begin

mas[i] : = random(100) ;

writeln('Element #', i, ' : ', mas[i]) ;

end ;

writeln ;

for i : = 1 to 20 do if mas[i] > ; max then max : = mas[i] ;

writeln('MAX : ', max) ;

min : = max ;

for i : = 1 to 20 do if mas[i] < ; min then min : = mas[i] ;

writeln('MIN : ', min) ;

writeln ;

for i : = 1 to 20 do

if (mas[i] > ; = min) and (mas[i] < ; = max) and (mas[i] mod 5 = 0) and (mas[i] < ; > ; 0) then

writeln('Element #', i, ' : ', mas[i]) ;

readln ;

end.

Artiomkonopli 27 сент. 2020 г., 07:42:34 | 1 - 4 классы

Найти максимальный элемент массива X(10)?

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

Помогите написать программу в паскале пожалуйста.

Abdusalamova99 8 апр. 2020 г., 20:11:35 | 10 - 11 классы

Составить программу на языке Паскаль : 1)Для массива K из 12 вещественных чисел определить сколько элементов массива меньше 0?

Составить программу на языке Паскаль : 1)Для массива K из 12 вещественных чисел определить сколько элементов массива меньше 0.

2)В массиве М из 10 целых чисел найти количество элементов равных 3.

3)В массиве из 8 целых найти номер массива с наибольшим значением.

4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента.

5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.

FroZen007 14 нояб. 2020 г., 19:08:11 | 10 - 11 классы

Напишите программу пожалуйста в паскалепроизведение элементов массива, расположенных между максимальным и минимальным элементами ?

Напишите программу пожалуйста в паскале

произведение элементов массива, расположенных между максимальным и минимальным элементами ;

Про100кири4 20 янв. 2020 г., 09:27:38 | 10 - 11 классы

Дан массив целых чисел из 12 элементов?

Дан массив целых чисел из 12 элементов.

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

Миньон4 2 янв. 2020 г., 08:46:10 | 10 - 11 классы

Дан массив всех целых чисел ?

Дан массив всех целых чисел .

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

(Паскаль).

Galinababenko 9 окт. 2020 г., 06:25:18 | 10 - 11 классы

Написать программу на паскале?

Написать программу на паскале.

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

Помогите пж.

Romanys 27 февр. 2020 г., 14:35:19 | 10 - 11 классы

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

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

Программа нужна в Pascal.

MRcoffee 14 мар. 2020 г., 08:36:28 | 5 - 9 классы

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

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

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

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

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

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

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

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

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

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

SpiderMan1997 3 авг. 2020 г., 10:04:59 | 10 - 11 классы

Написать в программу в паскале (сразу все) - найти максимальный и минимальный элемент в массиве?

Написать в программу в паскале (сразу все) - найти максимальный и минимальный элемент в массиве.

AhaT1k 23 апр. 2020 г., 11:05:29 | 10 - 11 классы

Помогите срочнооо, 60 баллов, Паскаль?

Помогите срочнооо, 60 баллов, Паскаль!

Дан массив из 20 целых чисел.

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