Найдите все ошибки в программе и исправьте их: Var i,j,k:integer; Begin Read(‘введитеk’); i:=20; j:=k/i; Writeln(j =

В качестве параметра процедура Read принимает только имена переменных.  Текстовый параметр ‘введите k’ мог бы быть параметром процедуры Write  или Writeln.

Для ввода значения переменной k следует использовать процедуру read(k).

Переменная j может принимать дробные значения. Тип Integer для нее указан неправильно. Правильно — j: real.

В процедуре вывода на экран Writeln текстовую часть (j = ) следует взять в кавычки.

Точка с запятой перед End не ставится.

Рабочая программа:

program divide;

var i, k: integer;

j: real;

begin     

write(\'Введите k \'); read(k);

i:= 20; j:= k / i;

writeln(\'j = \', j)

end.