Напишите программу которая находит наименьшую сумму каких либо двух цифр четырехзначного...

Question

Напишите программу которая находит наименьшую сумму каких либо двух цифр четырехзначного числа R Очень срочно!!! Осталось 10 минут.

Answer 1

Объяснение:

var a, b, c, d, A, F real

begin

read(A) ;

b:=A mod 10;

c:= A mod 100;

d:= A mod 1000;

a:= A div 1000;

дальше последовательно сравниваешь и потом складываешь и выводишь сумму (F)

пример

if aF:=a+c

writeln('сумма наименьших чисел равна', F)