Решите плиз программирование 7 класс

Program prog;
uses crt;

var a,b,s: real;

begin
clrscr;
write(a = );
readln(a);
write(b = );
readln(b);

writeln;
if (a-b) <> 0 then begin
   s:=1/(a-b);
   writeln(1/(,a,-,b,)=,s:0:3);
   end
else
    writeln(Не верен ввод);
    end.

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!