Question

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

Answer 1

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

Answer 2

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

Answer 3

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

Answer 4

Var

Sr, ves1, ves2 : real;

Begin

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

Readln (ves1);

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

Readln (ves2);

Sr:=(ves1+ves2)/2;

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

end.

Answer 5

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

Answer 6

Аууу

Answer 7

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

Answer 8

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