Question

Заполни пропуски в программе на языке Паскаль.

Определить, принадлежит ли точка g отрезку [k;v].

var
k,v,g:real;
begin
write(' ? =');
readln( ? );
write('v=');
readln(v);
write('g=');
readln( ? );
if (g>=k) and (g<= ? ) then writeln ('yes') else writeln('no');
readln;
end.

Answer 1

Ответ:

program adsas;

var

k,v,g:real;

begin

write(' k =');

readln( k );

write('v=');

readln(v);

write('g=');

readln( g );

if (g>=k) and (g<= v ) then writeln ('yes') else writeln('no');

readln;

end.