SCREEN 12
RANDOMIZE TIMER
FOR I = 1 TO 500
x = INT(RND * 639) + 1
y = INT(RND * 479) + 1
c = INT(RND * 15) + 1
PSET (x, y), c
NEXT I
END
Program zadacha;
Var t, v1, t1, v2, t2, v: real;
begin ;
Writeln ('введите значения v1, t1, v2, t2');
Readln (v1, t1, v2, t2);
t := (v1*t1+v2*t2)/(v1+v2);
Writeln ('T смеси = ', t);
<span>end.</span>
Может получиться так:
//Pascal ABC.NET v 3.3
var
x, s: integer;
begin
readln(x);
s := (x div 100) + (x mod 100) + (x mod 10);
writeln(s);
end.
1. 2 во 2 степени=4 это сообщение несет 2 бита. Здесь я не уверена, но думаю верно) Ответ: 2 бита
2. 1 символ весит=8бит=1байт
150*40*60=360000 символов в книге и весит книга 360000 байт можно перевести в Кбайты для удобства для этого нужно 360000/1024=351,5625Кбайт Ответ:351,5625Кбайт
<span>3. 2 в 6 степени = 64, т.е. один символ равен 6 битам . 0.75*1024*8=6144 бита 6144/32=192 бита - одна страница весит 192*6=1152 символа на каждой странице Ответ: 1152 символа</span>
Программное обеспечение- это то, что делает компьютеры универсальными, позволяя использовать типовую вычислительную машину для решения самых разнообразных задач.