ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!! 1. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
5-9 класс
|
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
Два в одном:
var
a: array [1..10] of integer;
s, i, max: integer;
begin
max:= - 16;
for i:= 1 to 10 do
begin
a[i]:= random(50) - 15;
writeln(a[i]);
s:= s + a[i];
if a[i] > max then max:= a[i];
end;
writeln('Сумма элементов массива: ', s);
writeln('Максимальный элемент массива: ', max);
end.
program Mas1;
uses Crt;
const n:=10;
Type Ar=array [1..n] of real;
var v:Ar;
s,max:real;
i:integer;
Begin
Clrscr;
s:=0;
max:=0;
i:=1;
For i:=1 to n do
begin
v[i]:=50*random-15;
s:=s+v[i];
If max<v[i] then max:=v[i];
end;
writeln ('S= ', s:6:2,' Max= ', max);
Readln;
End.
Другие вопросы из категории
сообщает название этого дня. Например, если ввели 1, то выведется фраза «Это понедельник» и т. д.
исходного файла ? решения и ответ
прибытия самолета в аэропорт назначения в виде «чч:мм» Формат входных данных: С клавиатуры вводится четыре числа через пробел НН, ММ, НР, МР, обозначающие соответственно часы и минуты вылета и часы и минуты продолжительности полета. Формат выходных данных: На экран вывести время прибытия самолета в аэропорт назначения в виде «чч:мм
Читайте также
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.
типа. Ввод организуйе без использования цикла 2) разработайте алгоритм для ввода в память ЭВМ одномерного массива С состоященр из 7 элементов целого тип. Ввод организуйе с исползованием цикла "ДЛЯ". 3) разработайте алгоритм для ввода в память ЭВМ одномерного массива Д состоящего из 10 элементов целого типа. Каждый элемнт вычислите по формуле: значение элемента равно квадрату его индекса