Question

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


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


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

Answer 1

Ответ:

var

k,n,z:real;

begin

write('=');

readln(k);

write('n=');

readln(n);

write('z=');

readln(z);

if (z>=k) and (z<=n) then writeln ('yes') else writeln('no');

readln;

end.