Поделитесь своими знаниями, ответьте на вопрос:
Составить алгоритм для программы, которая будет: - принимать от пользователя 3 числа - проверять, является ли 1 из введенных чисел суммой 2 других - выводить на экран найденное число, либо текст Таких чисел нет Пример работы программы: Ввод: 4 7 3 Вывод 7 (т.к., 7 = 4 + 3)
begin
var N: array [1..3] of real;
writeln('Введите три числа: ');
read(N[1],N[2],N[3]);
writeln('Результат: ');
for var l:=1 to 4 do begin if l>3 then write('Таких чисел нет')
else if N[l]=N.Sum-N[l] then begin write(N[l]); break end; end;
end.