Вы не уточнили, в какой системе программирования. будем считать, что это паскаль. если нет, логику для бэйсика можно тоже понять. всю программу не пишу, только её суть (т.к. все зависит опять же от системы программирования). for i: =1 to 5 do circle(200,200,i*10);
maxchuev
17.06.2021
1)300*60*55*5=4950000(бит) - занимает весь текст 2)100*280=28000(кб) - занимают все изображения если брать в 1 кб 1000 бит 3.1)4950000/1000+28000=32950(кб) - общий вес книги 4.1)32950/1000=32,95(мб) - вес книги если брать в 1 кб 1024 бит 3.2)4950000/1024+28000=32833(кб) - общий вес книги 4.2)32833/1024=32,06(мб) - вес книги
Станиславовна196
17.06.2021
По моему так: program p; var a,b,c: integer; begin writeln('первое число: '); readln(a); writeln('второе число: '); readln(b); writeln('третие число: '); readln(c); if (a> b) and (a> c) then writeln('первое число является наибольшим'); if (a> b) and (a< c) or (a< b) and (a> c) then writeln('первое число является средним'); if (a< b) and (a< c) then writeln('первое число является наимешим'); if (b> a) and (b> c) then writeln('второе число является наибольшим'); if (b> a) and (b< c) or (b< a) and (b> c) then writeln('второе число является средним'); if (b< a) and (b< c) then writeln('второе число является наимешим'); if (c> b) and (c> a) then writeln('третие число является наибольшим'); if (c> b) and (c< a) or (c< b) and (c> a) then writeln('третие число является средним'); if (c< b) and (c< a) then writeln('третие число является наимешим'); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Составьте программу рисования окружностей с центром в точке (200, 200) и радиусами 10, 20, 30, 40, 50 (применить команду for) . заранее , надо)