какая задача решается по следующей программе:
Program Test
var A, B, C: integer
begin
readln( A,B)
C:=(A+B)×(B-A)
writln C


Bats99: всмысле какая?
Bats99: что нужно конкретно сделать?
minifrik: Какой результат будет получен, если ввести вместо А и В, соответственно, 7 и 8?
Bats99: Program Test;
var
A, B, C: integer;
begin
writeln('введи 2 числа ');
readln(A,B);
C:=(A+B)*(B-A);
writeln('C=',C);
end.
Bats99: кароче С=15
minifrik: спасибо)
Bats99: пожалуста

Ответы

Ответ дал: Bats99
2
Program Test;
var
A, B, C: integer;
begin
writeln('введи 2 числа ');
readln(A,B);
C:=(A+B)*(B-A);
writeln('C=',C);
end.
Вас заинтересует