Question

Найдите ошибки в записи программы. Перепишите программу в исправленном виде.
program произведение
A, B, C: real
begin
readln (A, B)
C = A * B
writeln (Произведение введенных Вами чисел равно , C)
end.

Answer 1

var A, B, C: real;
begin
writeln('введите два числа');
readln (A, B);
C: = A * B;
writeln ('Произведение введенных Вами чисел равно' , C);
end.