Если на паскале то вот простой рисунок человечка : uses graphabc; var x,y: integer; beginx: =windowwidth div 2; y: =windowheight div 2; circle(x,y-100,25); line(x-50,y-75,x+50,y-75); line(x-50,y-75,x,y+25); line(x+50,y-75,x,y+25); line(x-70,y-75,x-50,y-75); line(x-70,y-75,x-60,y+25); line(x-50,y-75,x-60,y+25); line(x+70,y-75,x+50,y-75); line(x+70,y-75,x+60,y+25); line(x+50,y-75,x+60,y+25); line(x+40,y+25,x,y+25); line(x+40,y+25,x+20,y+125); line(x,y+25,x+20,y+125); line(x-40,y+25,x,y+25); line(x-40,y+25,x-20,y+125); line(x,y+25,x-20,y+125); end.
ЕкатеринаРустам
08.02.2021
1. var i,n: integer; begin readln(n); for i: =1 to n do begin if(n mod i = 0) then writeln(i); end; end.2.var shet1,count,sum: integer; beginshet1: =2; sum: =2; count: =1; while sum< =119 do begin count: =count+1; shet1: =shet1+1; sum: =sum+shet1; end; write('count = ',count); end.3.var a: integer; begin read(a); while(a < > 0) do begin write(a mod 10); a : = a div 10; end; end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Напишите программу, которая получает с клавиатуры натуральное число и определяет, сколько раз в его десятичной записи встречается цифра 1 в python.