Ввести 3 числа найти их удвоенное произведение
Ввести 3 числа найти их удвоенное произведение
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.Net
//NaaMan
var
a, b, c, result : real;
begin
write ('Введите через пробел три числа > ');
readln(a, b, c);
result := a * b * c * 2;
writeln('Результат вычислений = ', result)
end.
Не нашли ответ?
Похожие вопросы