Решите пожалуйста!!!

Решите пожалуйста!!!

Задать свой вопрос
1 ответ

var

s,t,s1,t1:real;

begin

Writeln('Введите s1 и t1');

Readln(s1,t1);

s:= s +s1; t:= t + t1;

Writeln('Введите s2 и t2');

Readln(s1,t1);

s:= s +s1; t:= t + t1;

Writeln('Введите s3 и t3');

Readln(s1,t1);

s:= s +s1; t:= t + t1;

t:= t / 60;

Writeln(s/t)

end.



, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт