
по результам приемных испытаний из 3х экзаменов определить студентов не прошедших конкурс если
проходной балл равен 13

Ответы на вопрос

var a,b,c:integer;
begin
write('Введите результаты 3-х экзаменов: ');
readln (a,b,c);
if a+b+c < 13 then writeln ('Сожалеем, вы не приняты...')
else writeln('Поздравляем, вы приняты!')
end.
const n=3;
var a:array [1..n,1..n] of integer;
i,j,s:integer;
begin
for i:=1 to n do
begin
for j:=1 to n do
begin
write('Введите результат ',j,' экзамена ',i,' ученика ');
readln(a[i,j])
end
end;
writeln;
for i:=1 to n do
begin
s:=0;
for j:=1 to n do s:= s+a[i,j];
if s < 13 then writeln ('Сожалеем, ученик ',i,' вы не приняты...')
else writeln('Поздравляем, ученик ',i,' вы приняты!')
end
end.



Для определения студентов, не прошедших конкурс на основе результатов трех экзаменов, где проходной балл равен 13, вам нужно сложить баллы, полученные каждым студентом на каждом из трех экзаменов и сравнить эту сумму с проходным баллом. Если сумма баллов меньше 13, то студент не прошел конкурс.
Давайте предположим, что у нас есть три студента, и у каждого из них есть результаты экзаменов:
Студент 1:
- Экзамен 1: 15 баллов
- Экзамен 2: 12 баллов
- Экзамен 3: 14 баллов
Сумма баллов студента 1: 15 + 12 + 14 = 41 балл
Студент 2:
- Экзамен 1: 10 баллов
- Экзамен 2: 14 баллов
- Экзамен 3: 16 баллов
Сумма баллов студента 2: 10 + 14 + 16 = 40 баллов
Студент 3:
- Экзамен 1: 13 баллов
- Экзамен 2: 15 баллов
- Экзамен 3: 12 баллов
Сумма баллов студента 3: 13 + 15 + 12 = 40 баллов
Теперь мы сравниваем сумму баллов каждого студента с проходным баллом 13:
- Студент 1: 41 балл (прошел)
- Студент 2: 40 баллов (не прошел)
- Студент 3: 40 баллов (не прошел)
Итак, студенты 2 и 3 не прошли конкурс, так как их сумма баллов меньше проходного балла.


Похожие вопросы

Топ вопросов за вчера в категории Информатика









Последние заданные вопросы в категории Информатика
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili