Question

На листе написать программы (приготовиться 25.02 сдать): 1. Вычислить сумму трех произвольных чисел, вывести результат в виде числового равенства (например, 5+3+1=9, -2+2-1=-1, 0,5+0,5+1=2). 2. Найти модуль разности двух чисел, введенных с клавиатуры. Сделать вывод в следующем формате: |-2-4|=-6, |3-5|=2

Answer 1

1.

program proizvol_ch;

var

a,b,c:integer;

begin

read(a,b,c);

write(a,'+',b,'+',c,'=',a+b+c)

end.

2.

program proizvol_ch;

var

a,b:integer;

begin

read(a,b);

write('|',a,'-',b,'|','=',abs(a-b))

end.