Помогите написать программку в Паскаль Abs:-D Задан проходной балл. Запрашиваются оценки

Помогите написать программку в Паскаль Abs:-D
Задан проходной балл. Запрашиваются оценки абитуриента на 4 экзаменах и сообщается о результате приема в институт.

Задать свой вопрос
Любовь Гвоздецкая
Вы массивы уже проходили, либо нет?
Олег Кулапов
Да через массив занимательней было бы, сам бы написал
Лилия Надневская
Хотя можно просто суммирование чисел цикл For и потом поделить на кол-во
2 ответа
Вот так задачка решается без массивов:
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) lt;sc then writeln ('NOT PASSED') else writeln('PASSED');
end.
Валерка Проломов
Спасибо:-)
Готово........................
Юрок
Спасибо:-)
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт