Построить блок схему алгоритма и написать программу для решения: Даны действительные числа z,y,x.Если сумма двух чисел x y меньше единицы ,то каждое из
10-11 класс
|
заданных трёх чисел заменить полусуммой двух других,в противном случае возвести в квадрат.
var
x, y, z: real;
a, b, c: real;
begin
readln(x, y, z);
if (x + y < 1) then
begin
a := (y + z) / 2;
b := (x + z) / 2;
c := (x + y) / 2;
x := a;
y := b;
z := c;
end
else
begin
x := sqr(x);
y := sqr(y);
z := sqr(z);
end;
writeln(x, ' ', y, ' ', z);
end.
Другие вопросы из категории
текста одной газеты (4 усл. п.л.) на лазерном принтере (скорость печати - 512 символов в секунду) без учета смены бумаги.
только максимально подорбно. прошу вас!!
B, C), меняющую содержимое переменных A, B, C таким
образом, чтобы их значения оказались упорядоченными по возрастанию (A, B,
C — вещественные параметры, являющиеся одновременно входными и
выходными). С помощью этой процедуры упорядочить по возрастанию два данных
набора из трех чисел: (A1, B1, C1) и (A2, B2, C2).
Читайте также
Задание 2) Разработать блок схему алгоритма? для вычисления и вывода на экран суммы 5 случайных числе в диапазоне 0..36.
2) Заданы действительные числа a , b , c и d . Написать программу нахождения полусуммы наименьшего и наибольшего из них.
3) Написать программу для вычисления суммы цифр числа , введенного с клавиатуры
Помогите прошу
матрица NxN. Программа должна осуществлять ввод и печать исходной матрицы и возможно, дополнительных данных, произвести необходимые действия и напечатать результаты. Подсчитать общее количество чисел, меньших заданного А, и чисел, больших заданного В среди элементов, находящихся ниже побочной диагонали.
перевода чисел в 2-ю с.с.)
Вычислить
сумму положительных элементов матрицы А (10х10), расположенных над главной
диагональю. Индекс номера строки i изменяется
от 1 до 9, а индекс номера столбца j изменяется от –i+1
до 10.