Определите средний вес 2-х подруг. Вес ввести с клавиатуры
Var
Sr, ves1, ves 2 :___
Begin
Writeln ('введи вес 1 подруги');
Readln (_____);
Writeln ('_____');
Readln (ves2);
Sr:=________
Writeln ('средний вес двух подруг: '____)

Это точно правильно? А цифры мне самому придумывать?

Это точно правильно? А разве вместо введите вес не нужно подставлять цифры?

Аууу

Ответьте на вопрос пожалуйста

мне вам найти подруг и узнать их вес что ли? числа вводятся рандомно,то есть любые...

В коде есть вызов процедуры Readln, которая как раз-таки запрашивает ввод у пользователя. Никаких чисел самостоятельно писать в коде не надо.

1. real
2. ves1
3. введи вес 2 подруги
4. (ves1 + ves2) / 2;
5. Sr

Var

Sr, ves1, ves2 : real;

Begin

Writeln ('Введите вес 1 подруги');

Readln (ves1);

Writeln ('Введите вес 2 подруги');

Readln (ves2);

Sr:=(ves1+ves2)/2;

Writeln ('средний вес двух подруг: ',sr);

end.