Для поступления в институт школьнику Умнову необходимо сдать 4 экзамена: математику, физику, русский и английский. Напишите программу для подсчета среднего балла, полученного школьником на вступительных экзаменах. Оценки по математике, физике и русскому введите с клавиатуры, а вот оценка по английскому языку известна заранее-это "5"(ведь Умнов окончил школу "Наука", а в ней прекрасно преподают английский язык!)

На языке Pascal :3

сейчас проверю

как там дела

ты домой что ли пощел

эх

жалко

program dfgdf;var m,o,r,f:real;beginwriteln('оценку по математике введите'); readln(m);if (m>=1) and (m<=5) thenbeginwriteln('оценку по русскому введите');readln(r);if (r>=1) and (r<=5) thenbeginwriteln('оценку по физике введите');readln(f);if (f>=1) and (f<=5) thenbegino:=(m+f+r+5)/4;writeln('средняя оценка = ',o);endelsebeginwriteln('не корректный ввод!!!');end;endelsewriteln('не корректный ввод!!!')endelsewriteln('не корректный ввод!!!')end.