Задачи по теме "Массивы" с решениями.

RAR

Документы из архива для просмотра:

PAS
задания_решения@SEP@Program1.pas
PAS
задания_решения@SEP@Program2.pas
PAS
задания_решения@SEP@Program3.pas
PAS
задания_решения@SEP@Program4.pas
PAS
задания_решения@SEP@Program5.pas
PAS
задания_решения@SEP@Program6.pas
PAS
задания_решения@SEP@Program7.pas
DOC
задания_решения@SEP@задания.doc
DOC
задания_решения@SEP@все_решения.doc
INI
задания_решения@SEP@ABC.ini

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

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

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

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

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

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

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

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

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

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

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4.    Подсчитать количество отрицательных элементов массива.

5.    Обнулить все отрицательные элементы массива.

6.    Все чётные элементы массива уменьшить вдвое и вывести новый массив на печать
1) program massiv;

uses crt;

var a:array[1..10] of integer;

i:integer;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

end.

2) program massiv;

uses crt;

var a:array[1..10] of integer;

i,s:integer;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

s:=0;

for i:=1 to 10 do

s:=s+a[i];

writeln;

writeln('s= ',s)

end.

3) program massiv;

uses crt;

var a:array[1..10] of integer;

i,s:integer;

sa:real;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

s:=0;

for i:=1 to 10 do

s:=s+a[i];

sa:=s/10;

writeln;

writeln('sa= ',sa)

end.

4) program massiv;

uses crt;

var a:array[1..10] of integer;

i:integer;

p:real;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

p:=1;

for i:=1 to 10 do

p:=p*a[i];

writeln;

writeln('p= ',p)

end.

5) program massiv;

uses crt;

var a:array[1..10] of integer;

i,k:integer;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

k:=0;

for i:=1 to 10 do

if a[i]<0 then k:=k+1;

writeln;

writeln('k= ',k)

end.

6) program massiv;

uses crt;

var a:array[1..10] of integer;

i:integer;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

writeln;

for i:=1 to 10 do

begin

if a[i]<0 then a[i]:=0;

write(a[i]:6)

end;

end.

7) program massiv;

uses crt;

var a:array[1..10] of integer;

b:array[1..10] of real;

i:integer;

begin

clrscr;

randomize;

for i:=1 to 10 do

begin

a[i]:=-20 + random(41);

write(a[i]:6);

end;

writeln;

for i:=1 to 10 do

begin

if a[i] mod 2=0 then b[i]:=a[i]/2 else b[i]:=a[i];

writeln(b[i]);

end;

end.

Краткое описание материала

Задачи на одномерные массивы:

1 ЭТАП:

Используя генератор случайных чисел, заполнить массив размерностью 10 элементов числами из интервала [-20,+20]. Вывести список элементов массива в одну строку с интервалом 4 пункта.

2 ЭТАП:

ВЫПОЛНИТЬ СЛЕДУЮЩИЕ ЗДАНИЯ:

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

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

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

4. Подсчитать количество отрицательных элементов массива.

5. Обнулить все отрицательные элементы массива.

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

С решениями.

Задачи по теме "Массивы" с решениями.

Информатика

Другие методич. материалы

04.01.2015

2216

Файл будет скачан в формате:

RAR

Автор материала

Ягодова Ольга Васильевна

учитель информатики

На сайте: 10 лет и 6 месяцев
Всего просмотров: 55021
Подписчики: 2
Всего материалов: 10

55021
просмотров
10
материалов
2
подписчиков

Настоящий материал опубликован пользователем Ягодова Ольга Васильевна.
Инфоурок является информационным посредником. Всю ответственность за опубликованные материалы несут пользователи, загрузившие материал на сайт. Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.