Помогите пожалуйста, не совсем разбираюсь с программированием!
Помогите пожалуйста, не совсем разбираюсь с программированием!
Гость
Ответ(ы) на вопрос:
Гостьvar x,y,z,min,max,r:real;
begin
write('x=');readln(x);
write('y=');readln(y);
write('z=');readln(z);
if xz then max:=min else max:=z;
r:=max/3;
writeln('r=',r);
end.
Не нашли ответ?
Похожие вопросы