Question

SOOOS!!! Заполни пропуски в программе на языке Паскаль. Определить, принадлежит ли точка z отрезку [a;n]. var a,n,z:real; begin write('?='); readln(?); write('n='); readln(n); write('z='); readln(?); if (z>=a) and (z<=?) then writeln ('yes') else writeln('no'); readln; end.

Answer 1

Ответ:

наи фото прога с заполнеными пропусками

Answer 2

Конечно! Вот заполненная программа на языке Паскаль:

pascalCopy code
var
  a, n, z: real;

begin
  write('a = ');
  readln(a);
  write('n = ');
  readln(n);
  write('z = ');
  readln(z);

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

  readln;
end.

В этой программе мы просим пользователя ввести значения для переменных a, n, и z, а затем проверяем, принадлежит ли точка z отрезку [a;n]. Если z находится внутри или на границах отрезка, программа выводит "yes", в противном случае - "no".