Составить программу вычисления минимального из трех чисел x,y,z. Использовать процедуру
10-11 класс
|
var a, b, c, n :integer;
procedure max(a,b:integer; var c :integer);
begin
if a>b then c:=a else c:=b;
end;
begin
read (a,b,c);
max(a,b,a);
max(a,c,a);
write (a);
end.
Другие вопросы из категории
– остаток от деления двух чисел).
11000111(2) + 11100100(2) + 100101002 = ...(2)
Прошу с подробным решением))
Читайте также
2. Составить программу для упорядоченное двух элементов по убыванию.
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE
28 15 10
Наибольшее число: 28
2)Составить функцию, которая определяет сумму всех чисел от 1 до N и привести пример ее использования.
Пример:
Введите число:
100
Сумма = 500
Буду очень признателен за помощь.
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"