Набрать в программе pascal программу исправив ошибки : program 123; uses crt ; var a,s: intedger; begin writeln ( 'введите два числа '); read(q,w); f: =q/w; writeln ( 'результат ' , f); readln; end.

PROGRAM PROG1;
USES CRT;
VAR A,S:INTEGER;
VAR F:REAL; 
BEGIN
WRITELN ( 'ВВЕДИТЕ ДВА ЧИСЛА ');
READ(A,S);
F:=A/S;
WRITELN ( 'РЕЗУЛЬТАТ ' , F);
READLN;
END.