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