Question

За решение 4 задач студент получил оценки (от 1 до5) Составьте программу, которая определит среднее значение оценок, полученных студентом за задачи! РЕШИТЕ ПЛИЗ В ПАСКАЛЕ!!!!! 8 КЛАСС!!

Answer 1

Var

i,x:integer;
sr:real;
begin
sr:=0;
for i:=1 to 4 do
begin
write('Оценка за задачу №',i,' ');
readln(x);
sr:=sr+x;
end;
sr:=sr/4;
write('Средняя оценка ',Round(sr));
End.

Answer 2

Программа на Паскале для определения среднего значения оценок, полученных студентом за задачи:

program AverageGrade;
var
  grade1, grade2, grade3, grade4: integer;
  average: real;
begin
  write('Введите оценку за первую задачу: ');
  readln(grade1);
  
  write('Введите оценку за вторую задачу: ');
  readln(grade2);
  
  write('Введите оценку за третью задачу: ');
  readln(grade3);
  
  write('Введите оценку за четвертую задачу: ');
  readln(grade4);
  
  average := (grade1 + grade2 + grade3 + grade4) / 4;
  
  writeln('Среднее значение оценок: ', average:0:2);
end.

В данной программе мы объявляем переменные `grade1`, `grade2`, `grade3`, `grade4`, которые будут хранить оценки за каждую задачу. Затем мы считываем значения оценок с помощью `readln` и сохраняем их в соответствующих переменных.

Далее мы вычисляем среднее значение оценок, складывая все оценки и деля полученную сумму на количество задач (в данном случае 4). Результат сохраняем в переменной `average`.

Наконец, выводим среднее значение оценок на экран с помощью `writeln`.

Программа позволяет решить задачу по определению среднего значения оценок, полученных студентом за задачи.