Решение задач по информатике ( по типу ОГЭ) презентация

Читайте заметки к слайдам
Рассмотрим на конкретном примере

Прочитайте задачу
var K,S,a : integer;
begin
S:= 0;
К:= 0;
write(“Введите число: »)
readln(a);
S:=S+a K:=K+1

Прочитайте задачу
var K,S,a : integer;
begin
N:= 0;
К:= 0;
write(“Введите число: »)
readln(a);
If a mod 10 = 4 then
begin S:=S+a ;
K:=K+1 end
writeln(S/K);

Прочитайте задачу
var K,S,a : integer;
begin
N:= 0;
К:= 0;
write(“Введите число: »)
readln(a);
while a<>0 do
begin
If a mod 10 = 4 then
begin S:=S+a ;
K:=K+1; еnd
readln(a);
еnd
writeln(S/K);

Прочитайте задачу
var K,S,a : integer;
begin
N:= 0;
К:= 0;
write(“Введите число: »)
readln(a);
while a<>0 do
begin
If a mod 10 = 4 then
begin S:=S+a ;
K:=K+1; еnd
readln(a);
еnd;
If K=0 then write (“NO”) else write (S/K)
end.

ПАМЯТКА

Напишите программу, ко­то­рая в по­сле­до­ва­тель­но­сти на­ту­раль­ных чисел опре­де­ля­ет ми­ни­маль­ное число, крат­ное 3. Про­грам­ма по­лу­ча­ет на вход ко­ли­че­ство чисел в последовательности, а затем сами числа. В по­сле­до­ва­тель­но­сти все­гда име­ет­ся число, крат­ное 3. Ко­ли­че­ство чисел не пре­вы­ша­ет 1000. Введённые числа не пре­вы­ша­ют 30 000. Про­грам­ма долж­на вы­ве­сти одно число — минимальное число, крат­ное 3.
Что найти?
Какие числа выбрать?
До каких пор вводить числа?
Что должна делать программа, если таких чисел нет?