Помогите написать программу в Паскаль АБС:-D Задан проходной балл. Запрашиваются оценки абитуриента на 4 экзаменах и сообщается о результате приема в институт.
Помогите написать программу в Паскаль АБС:-D
Задан проходной балл. Запрашиваются оценки абитуриента на 4 экзаменах и сообщается о результате приема в институт.
Ответ(ы) на вопрос:
Готово........................
Вот так задача решается без массивов:
program score;
var a,b,c,d,sc:integer;
res:integer;
begin
write('Input 1st exam score:');
readln(a);
write('Input 2nd exam score:');
readln(b);
write('Input 3rd exam score:');
readln(c);
write('Input 4th exam score:');
readln(d);
write('Input pass score:');
readln(sc);
if (a+b+c+d)
Не нашли ответ?
Похожие вопросы