Блок-схема и программа для вычисления суммы и произведения 3 чисел
Uses crt; var a,b,c,i,i_:integer; begin write('Введите 1 число: '); readln(a); write('Введите 2 число: '); readln(b); write('Введите 3 число: '); readln(c); i:=a+b+c; i_:=a*b*c; writeln('Сумма: ',i); writeln('Произведение: ',i_); end.