Дано: А10=49 и В10=7. Вычислить Р=А*В, С=А/В. Результаты представить в прямом коде.

Если я правильно понял задачу:
program qwer;
uses crt;
var a, b, c, p : real;
Begin
  a := 49 / 10;
  b := 7 /10;
  p := a * b;
  c := a / b;
  write(p, ,c);
End.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку