Question

На факультатив по информатике принимают учащихся у которых средний бал по математике физике и информатике не менее 13 будет ли посещать факультатив ученик средний бал которого L.Написать програму (paskal) опираясь на программу 9 класса

Answer 1

Var
L:integer;
begin
writeln('Введите средний балл ученика: ');
readln(L);
if L>=13 then
writeln('Ученик будет посещать факультатив.');
if L<13 then
writeln('Ученик не может посещать факультатив!');
end.