Даны числа a, b,c. составить программу, выводящую на экран сообщение, в зависимости от того какой треугольник можно построить с такими длина сторон: равносторонний, равнобедренный или какой либо другой. вот ещё одна
составить программу: даны а, b,c-целые числа. если они большн 0-вычислите сумму их квадратов; а если хотя бы одно из них четно-вычислите их сумму и произведение. .

первая

program n1; uses crt; var a,b,c,k: integer; beginwriteln('vvedite a,b,c'); readln(a,b,c); if (a=b)and(b=c) then begin k: =1; writeln('ravnostoronnij') end elseif (a=b)or(b=c)or(a=c) then begin k: =1; writeln('ravnobedrennij'); end; if (sqr(a)=sqr(b)+sqr(c))or(sqr(b)=sqr(a)+sqr(c))or(sqr(c)=sqr(b)+sqr(a)) then begin k: =1; writeln('pryamoygolnij'); end; if (a> b+c)or(b> a+c)or(c> a+b) then begin k: =1; writeln('treygolnik nelza sostavit'); end; if k=0 then writeln('treygolnik raznostoronnij'); readlnend.

вторая 

program n1; uses crt; var a,b,c: integer; beginclrscr; writeln('vvedite a,b,c'); readln(a,b,c); if (a> 0)and(b> 0)and(c> 0) then writeln('summa kvadratov=',sqr(a)+sqr(b)+sqr(b)); if (a mod 2=0)or(b mod 2=0)or(c mod 2=0) then writeln('summa =',a+b+c,', proizvedenie =',a*b*c); readlnend.

256 кбайт = 2^8 * 2^13 = 2^21 бит

2 мбайт = 2 * 2^23 = 2^24 бит

2^21 : 2^18 = 2^3 = 8 сек, потребуется для получения толей первых 256 кбайт

2^24 : 2^15 = 2^9 = 512 сек, потребуется мише чтобы скачать 2 мбайта

8 + 512 = 520 сек потребуется мише для получения информации 

всего известно до 5000 разных египетских иероглифов, однако в каждую эпоху использовалось не более 700-800. среди египетских иероглифов различают: 1) одноконсонантные знаки (около 30) - обозначавшие согласные звуки египетского языка; 2) двух-трехконсонантные знаки для фонетической передачи морфем; 3) идеограммы – для обозначения целых слов; 4) детерминативы – (непроизносимые) идеографические знаки, уточняющие значения слов.