1. Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое нечетных элементов массива с нечетными
10-11 класс
|
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы
1.program z;
var a:array [1..10] of integer; i,t:integer; s:real;
begin
for i:=1 to 10 do
begin
a[i]:=random(1,100);
write(a[i]:4);
if (odd(i)) and (odd(a[i])) then
begin
s:=s+a[i];
t:=t+1;
end;
end;
writeln;
write('Cреднее арифметическое = ',s/t);
end.
2.program z;
var a:array[1..10] of integer; max,i:integer;
begin
writeln('Исходный массив');
for i:=1 to 10 do
begin
a[i]:=random(1,100);
write(a[i]:4);
if a[i]>max then max:=a[i];
end;
writeln;
writeln('Измененный массив');
for i:=1 to 10 do
begin
if not(odd(a[i])) then a[i]:=max;
write(a[i]:4);
end;
end.
Другие вопросы из категории
размера заголовка).Каково максимально возможное число цветов в палитре изображения?
информации было получено?
var A: array [1..20] of integer;
i,s:integer;
begin
randomize;
s:=0;
for i:=1 to 20 do
begin
A[i]:=random(100);
write (' ',A[i] ');
end;
for i:=1 to 20 do
if imod2>0 then
s: = a[i]*a[i];
writeln;
writeln('s=',s);
readln;
end.
генератором случайных чисел (от 0 до 100) задан массив из 20 целых
чисел.составьте программу, с помощью которой напечатайте на одной
строчке исходный массив, а на следующей строке - сумму квадратов
элементов с начетными индексами
и английского алфавита прикосновением пера к экрану. Для переключения между заглавными и строчными буквами используется клавиша Shift, нажатие на которую приводит к смене режима на время ввода одной следующей буквы, и клавиша Caps Lock для постоянной смены режима. Для смены алфавита с русского языка на английский используется клавиша au (клавиша находится между Ctrl и Alt). В начальном состоянии клавиатура находится в режиме строчных русских букв.
Требуется написать программу, выводящую минимальную длину
последовательности прикосновений пера для набора заданной строки.
Технические требования.
Имя входного файла: INPUT.TXT
Имя выходного файла: OUTPUT.TXT
Формат входных данных:
В единственной строке входного файла содержится строка длиной не более 50 скатолов, содержащая заглавные и строчные русские и английские буквы. Формат выходных данных:
В единственной строке выходного файла содержится единственное число - минимальная длина последовательности прикосновений пера для набора заданной строки.
Примеры файлов входных данных: Примеры файлов выходных данных:
Строка 7
ПРИВЕТhеllо 14
Читайте также
Выведите на экран исходный и полученный массив. На Паскале
нечетные индексы. Выведите на экран исходный массив и полученное произведение.
на минимальный. Выведите на экран исходный и полученный массивы.
Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите разность наибольшего и наименьшего элементов. Выведите на экран полученный массив и полученную разность.