Программа на Pascal Abc

задача: Равны ли суммы первой и второй пары цифр четырёхзначного числа.

к примеру числа где каждая буква разряд: abcd

примерно a=1 b=4 c=3 d=2

тогда должно быть a+b=c+d 1+4=2+3 5=5

мне кажется так, но не понимаю как перевести это в паскаль

Question

Галюша

30 января, 10:04

+2

Ответы (1)

Знаете ответ на вопрос?

Аникитич · Answer 1

Var a, b, c, d:real;

begin

readln (a, b, c, d) ;

if a+b=c+d then

writeln ('a+b = c+d')

else

writeln ('a+b c+d') ;

end.