<span>схема отношения
векторное изображение
схема алгоритмов
функциональная схема
что то мб подойдет</span>
Var a:integer;S,p:real;beginWrite('Введите a сторону треугольника'); Readln(a);P:=3*a; Writeln('Периметр=',P);S:=(sqr(a)*sqrt(3))/4; Writeln('Площадь', S);Readln;end.
F1 = 6 Mбайт =2*3 *2^23 бит= 3*2^24 бит
V1=2^19 бит/с
V2=2^14 бит/с
F2=256=2^8 Кбайт=2^21 бит
------------------------------------------------
t1=2^21 :2^19 =2^2 =4 сек - время, за которое Толя скачает 256 Кбайт
t2=3*2^24 : 2^14 =3*2^10=3072 сек - Миша скачает все 6 Мбайт
t=t1+t2=4+3072=3076 cекунд - общее время ответ 3076
Program c2_2;
var a: integer;
begin
write('увядіте цэлы лік');
readln(a);
if (a mod 2=0) then a:=a div 2;
write (a);
end.