На языке паскаль
Вычислить произведение трёх чисел
(больше нечего не указано)

Вопрос школьника по предмету Информатика

На языке паскаль
Вычислить произведение трёх чисел
(больше нечего не указано)

Ответ учителя по предмету Информатика

Var

A,B:real;

Begin

Write(‘Первое число: ‘);

ReadLn(A);

Write(‘Второе число: ‘);

ReadLn(B);

A:=A*B;

Write(‘Третье число: ‘);

ReadLn(B);

A:=A*B;

WriteLn(‘Произведение данных чисел: ‘,A);

End.