var
a,b,max: integer;
begin
writeln('Введите два целых числа');
read(a,b);
if a>0 then
max:=a
else
max:=b;
writeln('Наибольшее число', max);
end. Так будет правильно, но смысл программы утерян полностью. Если нужно найти наибольшее число, то это другой код будет, этот вообще не понятно что делает
Объяснение:
import math
for i in range(10, 99 + 1):
if math.sqrt(i % 10 * 10 + i // 10 + i) % 1 == 0:
print(i)
Пояснения:
Перебираем с цикла for список всех двузначных чисел, созданный с функции range(10, 99 + 1).
i % 10 * 10 + i // 10 — меняем местами десятки и единицы (например, 29 превращаем в 92):
i % 10 — получаем десяткиi // 10 — получаем единицыПотом добавляем к полученному наше исходное число (например, 29 превращается в 92 и к нему прибавляется 29). Из этой суммы находим квадрат с функции sqrt() из модуля math (мы его подключили первой строкой import math). Чтобы проверить, полный ли квадрат получается из этого числа, нужно проверить, имеет ли остаток полученный корень. Я нашел остаток от деления с конструкции root % 1. Если остаток равен нулю, то квадрат полный, следовательно выводим число в консоль с функции print().
Практически все современные сетевые карты позволяют изменить мак-адрес в настройках системы. Поэтому, если адрес был изменен в настройках системы, а потом система была переустановлена, то эти настройки - сбросились и мак-адрес вернется к в сетевой карте. В этом случае, понятно, физический адрес компьютера - ИЗМЕНИТСЯ.
Данная ситуация актуальна в том случае, когда со стороны провайдера открыт доступ только по определенному мак-адресу. В таком случае прежде чем переустанавливать операционную систему не поленитесь переписать физический адрес на бумажку, чтобы узнать его надо в командной строке набрать
ipconfig /all
В ответ появится что-то наподобиее этого:
Описание . .: D-Link AirPlus DWL-G650 Wireless
Физический адрес. . : 00-11-95-DB-3F-E4
IP-адрес . .: 10.7.0.69
Маска подсети . .: 255.255.255.0
Основной шлюз . .: 10.7.0.67
DNS-серверы . .: 10.7.0.69
Исправленный код
var
a,b,max: integer;
begin
writeln('Введите два целых числа');
read(a,b);
if a>b then max:=a
else max:=b;
writeln('Наибольшее число ', max);
end.