<span>Cобытия равновероятны, поэтому номера этажей не повторяются.</span>
N = 2^4 = 16 этажей.
Если я правильно понял задание:
#include <iostream>
#include <algorithm>
#include <clocale>
template<typename T>
void func(T&& var1, T&& var2)
{
auto var3 = std::minmax(var1, var2);
std::cout << "min = " << var3.first << " | " << " max = " << var3.second << std::endl;
}
template<typename T>
void func(T&& var1, T&& var2, T&& var3)
{
auto var4 = std::minmax({var1, var2, var3});
std::cout << "Макс. число больше мин. числа в " << var4.second / var4.first << std::endl;
}
int main()
{
std::setlocale(LC_ALL, "Russian");
float var1, var2, var3;
std::cin >> var1 >> var2;
func(var1, var2);
std::cin >> var1 >> var2 >> var3;
func(var1, var2, var3);
std::system("PAUSE >> void");
return 0;
}
program area;
var
a:integer; // сторона а
b:integer; // сторона b
S:integer; // площадь прямоугольника
P:integer; // периметр прямоугольника
begin
write("Введите а: "); // выводим сообщение
readln(a); // получаем значение а
write("Введите b: "); // выводим сообщение
readln(b); // получаем значение b
S:=a*b; // вычисляем площадь
P:=a*2+b*2; // вычисляем периметр
write("Площадь равна:", S); // выводим сообщение
write("Периметр равен:", P); // выводим сообщение
end.
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var p := BigInteger.One;
for var i := 1 to n do
p *= i;
Writeln(n, '! = ', p)
end.