Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
рrogram summa;
var s, a, b, c : word;
write('введите a - > '); readln(a);
write('введите b - > '); readln(b);
write('введите с - > '); readln(c);
s=а+в+с
write(' сумма равна ',s);
readln
в принципе все, должно быть правильно
всмысле какая ? (ну если я правильно понял вопрос,то )тут находится только с по формуле: (a+b)*(b-a) и выводит результат (с) на экран.
Популярные вопросы