Презентация, доклад на тему Основные типы задач ОГЭ 20.2

Выбор цикла осуществляем в зависимости от условия задачи:

1. Цикл for: … Программа получает на вход количество чисел в последовательности, а затем сами числа…
2. Цикл while: …Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность)…
3. Проверку выполнения условия осуществляем сразу после ввода числа с использованием оператора условного перехода if … then… else • Кратность какому-либо числу (например, 4) a mod 4 = 0 • Четные числа a mod 2 = 0 • Нечетные числа a mod 2 <> 0 • Оканчивающихся на какую-либо цифру (например, 4) a mod 10 = 4 • Вторая цифра справа такая-то (например, 4) a div 100 mod 10 = 4 • Однозначные натуральные числа (a<=0) and (a>10) • Двузначные натуральные числа (a>9) and (a<100) и пр.

минимального числа
Нахождение среднего арифметического чисел

чисел используем счетчик. Чаще всего записываем его в виде: k:=k+1 или inc(k)
Вводим числа в цикле.

кратных 7. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 7. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – количество чисел, кратных 7.

i := 1 to n do
begin
write (‘Введите число ’);
readln(a);
if (a mod 7 = 0) then k := k + 1;
end;
writeln (‘Количество чисел, кратных 7 – ‘, k);
end.

сумму (произведение) чисел, кратных 5. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число – сумму чисел, кратных 5.

5 = 0) then s := s + x;
readln (x);
end;
writeln ('Сумма чисел, кратных 5 = ', s);
end.

0) then p := p* x;
readln (x);
end;
writeln (‘Произведение чисел, кратных 5 = ', р);
end.

делятся на 3 и при этом заканчиваются на 2. Программа должна вывести одно число: количество чисел, кратных 3 и оканчивающихся на 2.

n do
begin
write (‘Введите число ’);
readln(a);
if (a mod 3 = 0) and (a mod 10=2) then k := k + 1;
end;
writeln (‘Количество чисел, кратных 3 и оканчивающиеся на 2 = ‘, k);
end.

дневники наблюдения за погодой и ежедневно записывали дневную температуру. Найдите среднюю температуру за время наблюдения. Если количество дней, когда температура поднималась выше нуля градусов, не менее 5, выведите YES, иначе выведите NO.
Программа получает на вход количество дней, в течение которых проводилось наблюдение N (1 ≤ N ≤ 31), затем для каждого дня вводится температура.

do
begin
readln (t);
s:=s+t;
if t>0 then inc(k);
end;
if k>0 then tsr:=s/n;
writeln (tsr:5:1);
If k>=5 then writeln ('YES')
else writeln ('NO');
end.