Вычислить сумму или разность двух чисел в зависимости от их соотношения - Turbo Pascal

  1. Составить программу, вычисляющую сумму или разность двух чисел, в зависимости от соотношения этих чисел. Если первое число больше второго, то нужно вычислить их сумму, в противном случае - их разность p+t, при p<0 g={ t, при p=0 p-t, при p>0 t=4/14


textual

Код к задаче: «Вычислить сумму или разность двух чисел в зависимости от их соотношения - Turbo Pascal»

var a,b:longint;
BEGIN
 read(a,b);
 if a>b then write(a-b);
 if a<b then write(a+b);
END.

СДЕЛАЙТЕ РЕПОСТ

5   голосов, оценка 4.000 из 5



Похожие ответы
  1. Вычислить сумму ряда: S = √2d+√3d+√4d+…+√15d

  1. Ввести с клавиатуры одномерный массив из 5 чисел , подсчитать сумму элементов больше нуля и вывести результат на экран монитора.

  1. Ввести с клавиатуры двумерный массив из 9 чисел, подсчитать сумму элементов всего массива

  1. Вычислить С при любых значениях x, а, b:

  1. По введенным значениям аргумента х вычислить значение функции, заданной графически.Помогите пожалуйста написать программу в Паскале

  1. Здравствуйте, помогите написать программу на паскале, где

  1. Вычислить - Z=m1+m2/2, где m1 и m2 наименьшие элементы массивов X(20) и X(35).Использовать подпрограмму нахождения минимального элемента массива.

  1. Дано 8 вешественных чисел. Нужно вычислить разность между максимальным и минимальным из них. Заранее благодарен!

  1. Дано натуральное число n, входной поток данных: действительные числа a1,a2,a3, ... , aN. Получите удвоенную сумму всех положительных членов входного потока данных a1,a2,a3, ... , aN. Составьте код программы и блок-схему.

  1. Даны x, y и z. Вычислите a, b, если: Таблицу и блок-схему, будьте добры.