|
Урок 5 Дата 04.10.2023 Учитель Рогаль Т.В. Выполнение арифметических действий над элементами массива Использование массива, элементы которого являются константами. Построение круговой диаграммы |
Карта:
1. Повторите материал предыдущего урока
2. Изучите материал учебного пособия §4.3 - 4.4 учебник
3. Просмотрите видеоурок 4. Запишите в тетрадь:
Пример 1. Задано натуральное число n (n < 5000). Определить, является ли это число простым.
const s_n: array of integer = (2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47, 53, 59, 61, 67, 71);
var n,i: integer;begin
writeln(ꞌВведите числоꞌ);
read(n);
i := 0;
while (s_n[i] * s_n[i] <= n) and (n mod s_n[i] <> 0) do
i := i + 1;
if s_n[i]*s_n[i] > n then writeln(ꞌПростоеꞌ)
else writeln(ꞌСоставноеꞌ)
end.
Пример 2. Построить круговую диаграмму по числовым данным, хранящимся в массиве.
uses graphABC;
var a: array[1..10] of integer;
n, S, u0, u1: integer;
begin
write(ꞌКоличество n =ꞌ);
readln(n); writeln(n);
writeln(ꞌЭлементы массиваꞌ);
for var i := 1 to n do read(a[i]);
for var i := 1 to n do write(a[i], ꞌ ꞌ);
S := 0;
for var i := 1 to n do S := S + a[i];
u0 := 0;
for var i := 1 to n do
begin
u1:= u0+trunc(a[i]*360/S);
SetBrushColor(clRandom);
Pie(150,150,100,u0,u1);
u0 := u1;
end;
end.
var a: array[1..10] of integer;
n, S, u0, u1: integer;
begin
write(ꞌКоличество n =ꞌ);
readln(n); writeln(n);
writeln(ꞌЭлементы массиваꞌ);
for var i := 1 to n do read(a[i]);
for var i := 1 to n do write(a[i], ꞌ ꞌ);
S := 0;
for var i := 1 to n do S := S + a[i];
u0 := 0;
for var i := 1 to n do
begin
u1:= u0+trunc(a[i]*360/S);
SetBrushColor(clRandom);
Pie(150,150,100,u0,u1);
u0 := u1;
end;
end.
5. Практическая работа:
|
Оценивание |
Вариант 1 |
Вариант 2 |
|
4 балла |
№4 с.36 |
|
|
до 12 100 |
до 10 000 |
|
|
до 7 баллов |
№5.1 с.36 (задать свои цвета) |
|
|
до 9 баллов |
В массивы V и t вводят значения скорости велосипедиста (в м/с) и времени движения (в минутах) на 5 участках пути. Вычислить суммарный и средний пройденный путь. |
В массивы Rost и K вводят значения роста и количества учеников данного роста (5 пунктов). Вычислить суммарный рост и средний рост учеников. |
|
до 10 баллов |
№5.2 с.36 |
|
Пришли результат выполненных упражнений на проверку учителю на e-mail rohal74@mail.ru с обязательным указанием фамилии и класса.
Домашнее задание: §4.3 - 4.4 учебник
Оцените урок, заполнив титульный лист и Вариант 4. На остальных страницах нажимаем Далее до кнопки Отправить.
