Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Var
a,b,c,d:integer;
s:real;
begin
writeln(введите 1 оценку);
readln(a);
writeln(введите 2 оценку);
readln(b);
writeln(введите 3 оценку);
readln(c);
writeln(введите 4 оценку);
readln(d);
s:=(a+b+c+d)/4;
writeln(Среднее значение= ,s);
end.