a=2
b=8
цикл произошел два раза из-за a:=a+1
значит x равен от 100 до 9999(при прохождении получаются числа от 0,01 до 0,9999)
теперь остался b:
b в начале был равен и получил 8 при цикле. mod узнаёт остаток деления на 100 которое прошло 2 раза. посмотрим если выберем 9999
9999(остаток 99) -> 99,99(остаток 99+99). вывод: программа под буквой b вычислила сумма всех двузначных чисел. значит самое максимальное 800( 8 и 0) т.к. если выбрать больше 999 то 1000 это сумма 10 и 0 что не подходит. а нам надо самое максимальное.
Ответ:800
<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var (y,m,b):=ReadInteger3('Введите год, месяц и день:');
try
var d:=(new System.DateTime(y,m,b)).Date;
Writeln(d.AddDays(1).ToString[:11]);
except
Writeln('Вы ввели неверные данные')
end
end.
<u>Примеры</u>
Введите год, месяц и день: 2017 5 8
09.05.2017
Введите год, месяц и день: 2017 12 31
01.01.2018
Введите год, месяц и день: 2016 2 28
29.02.2016
Введите год, месяц и день: 2017 11 31
Вы ввели неверные данные
<span>99=10011001 в двоичной системе. класс сети B.
99.37.0.0 - адрес сети
0.0.125.186 - адрес компьютера в сети</span>