Задание скину фотографией.

Если её нет ,то непишите ничего и подождите 5 сек

Язык не указан, поэтому пример на C++
#include <iostream>

void main()
{
   int i, max = 10;
   while(std::cin >> i)
   {
       if(i == 0) break;
       if(i > max && i < 80) max = i;
   }
   std::cout << i << endl;
}

Var  a,b,c,mi: integer;begin
  readln (a,b,c);
  if ((b>a) and (b<c)) or ((b>c) and (b<a)) then mi:=b;
  if ((a>b) and (a<c)) or ((a<b) and (a>c)) then mi:=a;
  if ((c>a) and (c<b)) or ((c<a) and (c>b)) then mi:=c;
  write (mi);
end.    

Не было возможности скопировать, исходный текст у вас в личных сообщения: