Спо программированию. с клавиатуры вводится неограниченная последовательность чисел. ввод последовательности заканчивается 0.найти максимальное и минимальное число этой последовательности.

Max=0 min=30000 x=int( while x:     if x> max:         max=x     if x< min:         min=x print(max,min)

Первая: var a,r: real; begin writeln('введи длину сторону квадрата'); readln(a); writeln('введи радиус круга'); readln(r); if pi*r*r> a*a then writeln('площадь круга больше') else if pi*r*r< a*a then writeln('площадь квадрата больше') else writeln('площади фигур равны'); end. вторая: var m1,m2,v1,v2: real; begin write('m1 = '); readln(m1); write('m2 = '); readln(m2); write('v1 = '); readln(v1); write('v2 = '); readln(v2); if m1/v1< m2/v2 then writeln('плотность первого тела меньше') else if m1/v1> m2/v2 then writeln('плотность второго тела меньше') else writeln('плотности равны') end.

#include < iostream> using namespace std; int main() { int x,y,c1,c2,c3,c4 = 0; for (int i = 0; i < 10; ++i) { cin > > x > > y; if (x> 0 and y> 0) c1=c1+1; if (x< 0 and y> 0) c2=c2+1; if (x< 0 and y< 0) c3=c3+1; if (x> 0 and y< 0) c4=c4+1; } if (c1 > c2 and c1 > c3 and c1 > c4) cout < < "1-я четверть\n"; if (c2 > c1 and c2 > c3 and c2 > c4) cout < < "2-я четверть\n"; if (c3 > c2 and c3 > c1 and c3 > c4) cout < < "3-я четверть\n"; if (c4 > c2 and c4 > c3 and c4 > c1) cout < < "4-я четверть\n"; }