Разделы презентаций
- Разное
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Линейный массив Решение задач
Содержание
- 1. Линейный массив Решение задач
- 2. Задание 1В таблице Dat хранятся данные измерений
- 3. Задание 1Var k, m: integer;Dat: array[1..10] of
- 4. Задание 2В таблице Dat хранятся данные измерений
- 5. Задание 2Var k, m: integer;Dat: array[1..10] of
- 6. Задание 3В таблице Dat хранятся данные измерений
- 7. Задание 3Var k, m: integer;Dat: array[1..10] of
- 8. Задание 4В таблице Dat хранятся данные измерений
- 9. Задание 4Var k, m, n: integer;Dat: array[1...10]
- 10. Задание 5В таблице Dat хранятся данные измерений
- 11. Задание 5Var k, m: integer;Dat: array[1..11] of
- 12. Задание 6В таблице Tur хранятся данные о
- 13. Задание 6Var k, m: integer;Tur: array[1..11] of
- 14. Задание 7В таблице Ani хранятся данные о
- 15. Задание 7Var k, m: integer;Ani: array[1..12] of
- 16. Задание 8Владелец крупного яблоневого сада в течение
- 17. Задание 8Var k, m: integer;App: array[1..12] of
- 18. Скачать презентанцию
Задание 1В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] – данные за первый день, Dat[2] – за второй и т. д.). Определите, какое число будет
Слайды и текст этой презентации
![Задание 1В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] – данные](/img/thumbs/a8a2c9ee0e72c03470dc15e6be1cbfd2-800x.jpg "Линейный массив Решение задач Задание 1В таблице Dat хранятся данные измерений среднесуточной температуры за 10")
Слайд 3Задание 1
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1]:=
12; Dat[2]:= 15;
Dat[3]:= 17; Dat[4]:= 15;
Dat[5]:=
14; Dat[6]:= 12;Dat[7]:= 10; Dat[8]:= 13;
Dat[9]:= 14; Dat[10]:= 15;
m:= 0;
for k:= 1 to 10 do
if Dat[k] = 15 then
m:= m+1;
writeln(m);
End.
![Задание 1Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:= 15; Dat[3]:= 17; Dat[4]:=](/img/thumbs/0e281ffc43b6546e9dcb57280c2761b0-800x.jpg "Линейный массив Решение задач Задание 1Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:=")
Слайд 4Задание 2
В таблице Dat хранятся данные измерений среднесуточной температуры за
10 дней в градусах (Dat[1] – данные за первый день,
Dat[2] – за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 2В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] – данные](/img/thumbs/adc87a06404a21fe818a6a4c465216e8-800x.jpg "Линейный массив Решение задач Задание 2В таблице Dat хранятся данные измерений среднесуточной температуры за 10")
Слайд 5Задание 2
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1]:=
12; Dat[2]:= 15;
Dat[3]:= 17; Dat[4]:= 15;
Dat[5]:=
14; Dat[6]:= 12;Dat[7]:= 10; Dat[8]:= 13;
Dat[9]:= 14; Dat[10]:= 15;
m:= 0;
for k:=1 to 10 do
if Dat[k] > m then
m:= Dat[k]
writeln(m);
End.
![Задание 2Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:= 15; Dat[3]:= 17; Dat[4]:=](/img/thumbs/8d855add7ae9d227525b18909089bf9e-800x.jpg "Линейный массив Решение задач Задание 2Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:=")
Слайд 6Задание 3
В таблице Dat хранятся данные измерений среднесуточной температуры за
10 дней в градусах (Dat[1] – данные за первый день,
Dat[2] – за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 3В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] – данные](/img/thumbs/3521e6670a66113e79e28cc299cc057c-800x.jpg "Линейный массив Решение задач Задание 3В таблице Dat хранятся данные измерений среднесуточной температуры за 10")
Слайд 7Задание 3
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1]:=
12; Dat[2]:= 15;
Dat[3]:= 17; Dat[4]:= 15;
Dat[5]:=
14; Dat[6]:= 12;Dat[7]:= 10; Dat[8]:= 13;
Dat[9]:= 14; Dat[10]:= 15;
m:= 0;
for k:=1 to 10 do
if Dat[k] > 12 then
m:= m + 1
writeln(m);
End.
![Задание 3Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:= 15; Dat[3]:= 17; Dat[4]:=](/img/thumbs/34710e547971d68e56a21aba7c29d15f-800x.jpg "Линейный массив Решение задач Задание 3Var k, m: integer;Dat: array[1..10] of integer;Begin Dat[1]:= 12; Dat[2]:=")
Слайд 8Задание 4
В таблице Dat хранятся данные измерений среднесуточной температуры за
10 дней в градусах (Dat[1] – данные за первый день,
Dat[2] – за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 4В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] – данные](/img/thumbs/360f8c519330b289d5b15d2565373e49-800x.jpg "Линейный массив Решение задач Задание 4В таблице Dat хранятся данные измерений среднесуточной температуры за 10")
Слайд 9Задание 4
Var k, m, n: integer;
Dat: array[1...10] of integer;
Begin
Dat[1]:= 7; Dat[2]:= 9;
Dat[3]:= 10; Dat[4]:= 5;
Dat[5]:= 6; Dat[6]:= 7;Dat[7]:= 9; Dat[8]:= 8;
Dat[9]:= 6; Dat[10]:= 9;
m:= 10; n:= 0;
for k:=1 to 10 do
if Dat[k] < m then
Begin
m:= Dat[k];
n:= k
end;
writeln(n);
End.
![Задание 4Var k, m, n: integer;Dat: array[1...10] of integer;Begin Dat[1]:= 7; Dat[2]:= 9; Dat[3]:= 10;](/img/tmb/3/242198/12a631db680d4539e13f913a82bdd7e2-800x.jpg "Линейный массив Решение задач Задание 4Var k, m, n: integer;Dat: array[1...10] of integer;Begin Dat[1]:= 7;")
Слайд 10Задание 5
В таблице Dat хранятся данные измерений среднесуточной температуры за
11 дней в градусах (Dat[1] – данные за первый день,
Dat[2] – за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 5В таблице Dat хранятся данные измерений среднесуточной температуры за 11 дней в градусах (Dat[1] – данные](/img/thumbs/a86d86b18aba34ba255263e724078ea0-800x.jpg "Линейный массив Решение задач Задание 5В таблице Dat хранятся данные измерений среднесуточной температуры за 11")
Слайд 11Задание 5
Var k, m: integer;
Dat: array[1..11] of integer;
Begin
Dat[1]:=
20; Dat[2]:= 27;
Dat[3]:= 19; Dat[4]:= 28;
Dat[5]:=
26; Dat[6]:= 22;Dat[7]:= 24; Dat[8]:= 28;
Dat[9]:= 26; Dat[10]:= 21;
Dat[11]:= 27;
m:= 0;
for k:=1 to 11 do
if Dat[k] < 25 then
m:= Dat[k];
writeln(m);
End.
![Задание 5Var k, m: integer;Dat: array[1..11] of integer;Begin Dat[1]:= 20; Dat[2]:= 27; Dat[3]:= 19; Dat[4]:=](/img/thumbs/6c9d23d80e6bbf55b4de265e67be9fd5-800x.jpg "Линейный массив Решение задач Задание 5Var k, m: integer;Dat: array[1..11] of integer;Begin Dat[1]:= 20; Dat[2]:=")
Слайд 12Задание 6
В таблице Tur хранятся данные о количестве ребят, ходивших
в поход вместе с туристическим клубом «Полянка». (Tur[1] – число
ребят в 2001 году, Tur[2] – в 2002 году и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Слайд 13Задание 6
Var k, m: integer;
Tur: array[1..11] of integer;
Begin
Tur[1]:=
1; Tur[2]:= 11;
Tur[3]:= 8; Tur[4]:= 12;
Tur[5]:=
5; Tur[6]:= 6;Tur[7]:= 15; Tur[8]:= 16;
Tur[9]:= 16; Tur[10]:= 21;
Tur[11]:= 7;
m:= 0;
For k := 1 to 11 Do
If Tur[k] > 12 Then
m:= m + Tur[k];
Writeln(m);
End.
![Задание 6Var k, m: integer;Tur: array[1..11] of integer;Begin Tur[1]:= 1; Tur[2]:= 11; Tur[3]:= 8; Tur[4]:=](/img/thumbs/b3aa7855224a3952f539b2e7b23dba96-800x.jpg "Линейный массив Решение задач Задание 6Var k, m: integer;Tur: array[1..11] of integer;Begin Tur[1]:= 1; Tur[2]:=")
Слайд 14Задание 7
В таблице Ani хранятся данные о численности обезьян в
зоопарке города Тулы (Ani[1] – число обезьян в 2001 году,
Ani[2] – в 2002 и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 7В таблице Ani хранятся данные о численности обезьян в зоопарке города Тулы (Ani[1] – число обезьян](/img/thumbs/50a343d91208d1e700543c3a5b4a873a-800x.jpg "Линейный массив Решение задач Задание 7В таблице Ani хранятся данные о численности обезьян в зоопарке")
Слайд 15Задание 7
Var k, m: integer;
Ani: array[1..12] of integer;
Begin
Ani[1]:=
17; Ani[2]:= 17;
Ani[3]:= 19; Ani[4]:= 21;
Ani[5]:=
23; Ani[6]:= 22;Ani[7]:= 24; Ani[8]:= 16;
Ani[9]:= 19; Ani[10]:= 21;
Ani[11]:= 17; Ani[12]:= 17;
m:= 0;
For k := 1 to 12 Do
If Ani[k] = 17 Then
m:= m + Ani[k];
Writeln(m);
End.
![Задание 7Var k, m: integer;Ani: array[1..12] of integer;Begin Ani[1]:= 17; Ani[2]:= 17; Ani[3]:= 19; Ani[4]:=](/img/thumbs/dc4402d43b13c0bdd5237a36806f4c6d-800x.jpg "Линейный массив Решение задач Задание 7Var k, m: integer;Ani: array[1..12] of integer;Begin Ani[1]:= 17; Ani[2]:=")
Слайд 16Задание 8
Владелец крупного яблоневого сада в течение 12 лет записывал
в таблицу App количество собранного урожая. (App[1] – количество тонн
яблок, собранных за первый год, App[2] – за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.![Задание 8Владелец крупного яблоневого сада в течение 12 лет записывал в таблицу App количество собранного урожая. (App[1]](/img/tmb/3/242198/14dd2a5f225cfa19637515035779c043-800x.jpg "Линейный массив Решение задач Задание 8Владелец крупного яблоневого сада в течение 12 лет записывал в")
Слайд 17Задание 8
Var k, m: integer;
App: array[1..12] of integer;
Begin
App[1]:=
100; App[2]:= 128;
App[3]:= 80; App[4]:= 99;
App[5]:=
120; App[6]:= 69;App[7]:= 55; App[8]:= 115;
App[9]:= 84; App[10]:= 111;
App[11]:= 59; App[12]:= 100;
m:= 0;
For k:= 1 to 12 Do
If App[k] > 100 Then
m:= m + 1;
m: = m + 10;
Writeln(m);
End.
![Задание 8Var k, m: integer;App: array[1..12] of integer;Begin App[1]:= 100; App[2]:= 128; App[3]:= 80; App[4]:=](/img/thumbs/b4dfe2908eec64312d66fdf0f811f073-800x.jpg "Линейный массив Решение задач Задание 8Var k, m: integer;App: array[1..12] of integer;Begin App[1]:= 100; App[2]:=")
