Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x: real;
begin
readln(x);
writeln(x: 0: 0);
end.
s,a,n,i,min,max: integer;
min: =32767;
max: =-32768;
readln(n);
for i: =1 to n do
readln(a);
if a< min then min: =a;
if a> max then max: =a;
end;
s: =(min+max)/2;
writeln(s);
б< т
к< л
с< е
липа ниже березы
к< л< б< т
сосна выше тополя
к< л< б< т< с< е
самое высокое ель
самое низкое клен
крестьянин должен переправить волка и капусту с собой.а козу надо кинуть
на другой берег.
Популярные вопросы