Напишите программку для решения примера а=в/с, при условии, что ,с, не

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var (b, c) := ReadReal2;

 if c lt;gt; 0 then Write('a=', b / c)

 else Print('с=0')

end.

var a, b, c: integer;

begin

read(b,c);

if (cgt;0)and(clt;0) then a:=b/c write(a) else write('c=0');

end.

Это для паскаля