Question

Составить Программу в Paskal ABC Чтобы:
Ввести А и В
Увеличить А на10
Уменьшить В в 4 раза
Найти разницу А и В
Умножить разницу на А
Вывести результат умножения

Answer 1

program one;var A, B, x: real;beginwriteln ('Введите А и В');readln (A, B);A:=A+10;B:=B/4;x:=A-B;A:=A*x;Writeln (A);end.

Answer 2

СПАСИБО