Задачи по теме "Массивы" с решениями.
Предпросмотр материала:
Выберите файл для просмотра:
Всего файлов: 10
- 1/10 задания_решения/Program1.pas 1/10 задания_решения/Program1.pas
- 2/10 задания_решения/Program2.pas 2/10 задания_решения/Program2.pas
- 3/10 задания_решения/Program3.pas 3/10 задания_решения/Program3.pas
- 4/10 задания_решения/Program4.pas 4/10 задания_решения/Program4.pas
- 5/10 задания_решения/Program5.pas 5/10 задания_решения/Program5.pas
- 6/10 задания_решения/Program6.pas 6/10 задания_решения/Program6.pas
- 7/10 задания_решения/Program7.pas 7/10 задания_решения/Program7.pas
- 8/10 задания_решения/задания.doc 8/10 задания_решения/задания.doc
- 9/10 задания_решения/все_решения.doc 9/10 задания_решения/все_решения.doc
- 10/10 задания_решения/ABC.ini 10/10 задания_решения/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.
Задачи по теме "Массивы" с решениями.
Найдите подходящий для Вас курс
В каталоге 7 851 курс по разным направлениям
Другие материалы
-
Подборка GOOGLE-тестов по информатике:
Учебник: «Информатика», Босова Л.Л., Босова А.Ю.
Тема: 4.1.2. Что такое локальная компьютерная сеть
-
Видеоматериал к ВКР "200 лет городу Грозный"
Учебник: «Информатика. Углубленный уровень (в2 частях)», Поляков К.Ю., Еремин Е.А.
-
ВКР на тему "Создание видеоролика -200 лет городу Грозный"
Учебник: «Информатика. Углубленный уровень (в2 частях)», Поляков К.Ю., Еремин Е.А.
-
Сервисы для помощи при дистанционном обучении "Информатика"
Учебник: «Информатика», Босова Л.Л., Босова А.Ю.
Тема: Глава 1. Математические основы информатики
-
Рабочая программа по информатике для 7 класса (1 час в неделю) по ФГОС
Учебник: «Информатика», Босова Л.Л., Босова А.Ю.
-
Информационные ресурсы общества. Образовательные информационные ресурсы
Учебник: «Информатика. Базовый уровень», Босова Л.Л., Босова А.Ю.
Тема: § 1. Информация. Информационная грамотность и информационная культура
Вам будут интересны эти курсы:
- Курс повышения квалификации «Введение в программирование на языке С (СИ)»
- Курс повышения квалификации «Облачные технологии в образовании»
- Курс повышения квалификации «Организация работы по формированию медиаграмотности и повышению уровня информационных компетенций всех участников образовательного процесса»
- Курс повышения квалификации «Современные тенденции цифровизации образования»
- Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»
- Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
- Курс повышения квалификации «Специфика преподавания информационных технологий в соответствии с ФГОС СПО»
- Курс профессиональной переподготовки «Математика и информатика: теория и методика преподавания в образовательной организации»
- Курс профессиональной переподготовки «Теория и методика обучения информатике в начальной школе»