Ввести 3 числа найти их удвоенное произведение
//PascalABC.Net
//NaaMan
var
a, b, c, result : real;
begin
write (Введите через пробел три числа > );
readln(a, b, c);
result := a * b * c * 2;
writeln(Результат вычислений = , result)
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
