Определите наибольшую из трех целых чисел.
Окно результатов работы программы должно быть следующим!!!
Определение величины 3 числа
3 Введите целое число
-4
Пять
-9
max=5
2.извлеките числа с равными числами между двузначными числами.
Окно результатов работы программы должно быть следующим!!!
Числа равны между двузначными числами:
11 22 33 44 55 66 77 88 99
3.дано целое число. 3-делимость до бөлінбейтіндігін или сообщи. (разделение числа на 3
для того чтобы сумма его цифр должна быть разделена на 3)
Окно результатов работы программы должно быть следующим!!!
Введите число 32403456
Число 32403456 делится на 3, так как количество цифр числа делится на 3.
сумма равна сумме 27
4. номер месяца присвоен. Имя, наверное, месяца, в соответствии внесенных номеров. 3 марта
Окно результатов работы программы должно быть следующим!!!
Введите номер месяца
Одиннадцать
11-й месяц ноябрь
Введите номер месяца
Двадцать
20-го месяца нет НА ЯЗЫКЕ С+++

Uses graphabc; var i: integer;   procedure montain (x,y,k: integer); begin setpenwidth(1); setpencolor(clgreen); line(x,y,x-(30*k),y+(30*k)); line(x,y,x+(30*k),y+(30*k)); line(x+(30*k),y+(30*k),x-(30*k),y+(30*k)); floodfill(x,y+10,clgreen); setpencolor(clbrown); line(x,y,x-(20*k),y+(20*k)); line(x,y,x+(20*k),y+(20*k)); line(x+(20*k),y+(20*k),x-(20*k),y+(20*k)); floodfill(x,y+10,clbrown); setpencolor(clwhite); line(x,y,x-(10*k),y+(10*k)); line(x,y,x+(10*k),y+(10*k)); line(x+(10*k),y+(10*k),x-(10*k),y+(10*k)); floodfill(x,y+5,clwhite); end;   begin setpencolor(clnavy); setwindowsize(900,600); clearwindow(clnavy); for i: =1 to 100 do     begin     setbrushcolor(rgb(random(255),random(255),random(;     circle(random(700)+200,random(180),3);     end; setbrushcolor(clgreen); rectangle(0,350,900,600); setpencolor(clblue); arc(900,1300,900,0,180); floodfill(800,500,clblue); montain (500,150,7); montain (700,170,6); montain (300,200,5); montain (200,270,3); montain (600,270,3); montain (400,270,2); montain (50,300,2); setpencolor(clteal); arc(500,1250,900,80,180) arc(800,1250,900,95,180); floodfill(100,500,clolive); setpencolor(clwhite); arc(100,100,50,-84,180); arc(70,130,40,-30,150); floodfill(100,100,clwhite); end. плагиат ,конечно, но всё же