составить программу, запрашивающую оценки за контрольные работы по информатике и физике. если их сумма не менее 8, то на экране должен выводиться комментарий "Молодец!", в противном случаем - "Подтянись!".

program zz1;

var n, k:integer; / / задаем переменные целого типа

begin

write (' Какую оценку ты получил за контрольную работу по физике? ');

read (n); / / вводим с клавиатуры заданное первое число

write (' Какую оценку ты получил за контрольную работу по информатике? ');

read (k); / / вводим с клавиатуры заданное второе число

if n + k > 7 / / проверяем условие, если сумма оценок 8 и выше, то

then write (' Молодец! ') / / выводим один ответ

else write (' Подтянись! '); / / иначе, выводим другой ответ

end.