Написать программу для Pascal ABC ** вычисление среднего балла за год. С клавиатуры...

Question

Написать программу для Pascal ABC на вычисление среднего балла за год. С клавиатуры вводится 4 числа.

Comments

Структура входных данных?

---

4 числа должно вводится с клавиатуры

---

Просто найти среднее 4х введенных чисел?

---

да

Answer 1

Var
a,b,c,d:integer;
begin
  writeln('Введите первое число');
  readln(a);
  writeln('Введите второе число');
  readln(b);
  writeln('Введите третье число');
  readln(c);
  writeln('Введите четвертое число');
  readln(d);
  writeln('Среднее четырех чисел = ',(a+b+c+d)/4)
end.

Comments

Спасибо) Но можно было и проще)

---

var
a,b,c,d:integer;
begin
readln(a,b,c,d);
writeln('Среднее четырех чисел = ',(a+b+c+d)/4)
end.