Расположить числа в порядке возрастания: 111 во 2 степени , А2 в 16 степени , 34 в 8 степени , 76 в 10 степени
1 ответ:
Читайте также
Язык программирования: Паскаль
а)
var
m, n : integer;
begin
readln (m);
readln (n);
if m > n then
writeln ('Первый пакет тяжелее');
if n > m then
writeln ('Второй пакет тяжелее');
end.
б)
var
m, n : integer;
begin
readln (m);
readln (n);
if m > n then
writeln ('Вес более тяжёлого пакета равен ', m, ' кг');
if n > m then
writeln ('Вес более тяжёлого пакета равен ', n, ' кг');
end.