Информатика

Василиска

7 августа, 21:31

Объясните, что я сделала не так? Попытка присвоить переменной типа integer выражение типа real Как исправить? А задача: найти среднее значение 3-х чисел.

program chisla;

uses crt;

var a, b, c, x:integer;

begin

writeln ('vvedite tri chisla') ;

readln (a) ;

readln (b) ;

readln (c) ;

x: = ((a+b+c) / 3) ;

readln (x) ;

end.

x: = ((a+b+c) / 3) ; вот именно здесь у меня ошибку показывает.