Есть ответ 👍

Название клавиши переключения регистраторов клавиатуры

125
302
Посмотреть ответы 2

Ответы на вопрос:


shift, caps

kamilfox
4,7(23 оценок)

1)    var     a ,i,min: integer; begin min : = 30000;   i : = 0;   while i < > 12 do   begin     readln(a);     if (a< min) and (a mod 2 = 0) then     min : = a;     i : = i +1;   end; writeln (min); end. 2)   var    a ,i,max: integer; begin max : = 0;     i : = 0;   while i < > 12 do  begin    readln(a);     if (a> max) and (a mod 10 = 2) then    max : = a;     i : = i +1;   end; writeln (max); end.

Популярно: Информатика