Есть ответ 👍

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

251
487
Посмотреть ответы 2

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


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.

йцццу
4,4(85 оценок)

Нет:   сколько у  вас работ, для  каких клиентов, в  какой технике и  какого качества, какие программы использованы.по  ситуации:   возраст, место жительства или  работы; биография, образование, владение иностранными языками, подробности личной жизни.да:   профессиональные интересы, чем вы будете полезны, любимые типы , владение полезными знаниями и  навыками, которые нельзя увидеть портфолио. описывать свои работы  — тупиковый путь:

Популярно: Информатика