Viror ypoka аПовернуть на 90 градусов влевоОтразить по горизонталиОтразить слева на правоу)Повернуть на 90 градусов вправоОтразить по вертикалио o10052024632545
Если квадрат натурального числа не превосходит 225, то само это число не может превосходить √225 = 15. Алгоритм Заносим в переменную res (результат) число 0. Оно заведомо меньше любого из натуральных чисел в последовательности. Читаем очередное число в последовательности. Если оно больше res и при этом не превышает 15, записываем его в res. Если оно равно нулю, чтение прекращаем и выводим значение res.
var res,num:integer; begin res:=0; repeat Read(num); if (num>res) and (num<=15) then res:=num until num=0; Writeln(res) end.
Алгоритм
Заносим в переменную res (результат) число 0. Оно заведомо меньше любого из натуральных чисел в последовательности.
Читаем очередное число в последовательности. Если оно больше res и при этом не превышает 15, записываем его в res. Если оно равно нулю, чтение прекращаем и выводим значение res.
var
res,num:integer;
begin
res:=0;
repeat
Read(num);
if (num>res) and (num<=15) then res:=num
until num=0;
Writeln(res)
end.