Прога А на ABCPaskal^
Progaram sdaef;
var S, i: real;
label cikl;
S:=0;
i:=10;
if i>5 then begin
cikl:
S:=S+i;
i:= i-1
If i> 5 then goto cikl;
else
writeln (S);
end;
end.
Переводим из 2ой системы счисления в 10ю.
10101011 = 171
11001100 = 204
11000111 = 199
11110100 = 244
Переводим из 16ой системы счисления в 10ю.
BC = 188
Переводим из 8ой системы счисления в 10ю.
20 = 16
BC(16)+20(8) = 188+16 = 204
10101011 и 11000111 меньше BC(16)+20(8)
N=64
I= 1/64 мб = 126 бит
K=?
Решение:
2 в степени i = N ,следовательно i=6
K=126:6=21
Ответ:21 символ
Описание:
введем массив из температур - w,
будем вводить значения температур с помощью цикла и сразу находить сумму s, затем найдем среднее значение sr_t и выведем его значение, отведя для этого 5 знакомест, из которых 2 после запятой - sr_t:5:2.
program sr_temp;
var s,i:integer; sr_t:real;
w: array [1..7] of integer;
begin
s:=0;
for i:=1 to 7 do
begin
readln(w[i]); s:=s+w[i];
end;
sr_t:=s/7;
writeln('Средняя температура за неделю - ',sr_t:5:2);
end.
что то мне подсказывает что для разгона надо брать память с радиаторами и не перегревать а все остальное на нормальных плашках все будет ок