Помогите!!! Составить нужно по блок-схеме программу в паскале. То, что я сделала ошибку выдает(



Var a,b,c:real;
begin
readln(a,b);
if a=b then writeln('Нельзя вычислить')
else if a<0 then writeln('Нельзя вычислить')
      else begin
           c:=sqrt(a)/(b-a);
           writeln('c = ',c:6:4);
           end;
end.

Пример:
8 3
c = -0.5657

Оцени ответ
Не нашёл ответ?

Если тебя не устраивает ответ или его нет, то попробуй воспользоваться поиском на сайте и найти похожие ответы по предмету Информатика.

Найти другие ответы

Загрузить картинку
© Задачки.net