Program a;
var x,a,b,c: real;
begin
write('x,a,b,c = ?');
read(x,a,b,c);
x:=exp((a)*2)+3*exp((b)*2)-18*a*c;
writeln('x=',x);
<span>end.
(Паскаль)</span>
черный ящик дает остаток от деления входных данных на 3
Смотри объясню как делать дни недели и дату впиши сам. на чтение запиши каждый день по 20 мин, а потом сложи(за неделю)(140) и раздели(среднее)(20)
просмотр передач запиши п. 20мин ; вт. 40мин ; ср. 45 мин; чт 15 мин ; пт 1 час ; сб. 2 часа; вс 1 час. всего за неделю выйдет 5 часов, среднее 43 мин.. Компьют игры. пн 30, вт 30, ср 1 час, чт 2 часа, пт 30 мин, сб 30 мин, вс 1 час. свего 5 часов. среднее 43 минуты. Активные игры понедельник 2 часа. вт 40 мин,ср 1 час 20 мин, чт 2 часа, пт 3 часа, сб 1 час, вс 2 часа. всего12 часов, среднее 2 часа. общение или прогулки. пн 1 часм, вт 30 мин, ср 30 мин, чт 40 мин, пт 1 час 20 мин, сб 2 часа, вс 1 час. всего8 часов. среднее 1 час. другое сможешь придумать сам ?