Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x: array[1..15]of integer;
i,min,z: integer;
begin
min: =32000;
z: =0;
for i: =1 to 15 do
readln(x[i]);
if x[i]> 0 then if x[i]< min then min: =x[i];
if x[i]=0 then inc(z);
end;
writeln(min);
writeln(z);
end.
в одном байте восемь бит. следовательно 100/8=12.5
ответ 12.5
1)никакие люди не повторят подвиг матросова!
2)все великие,учёные люди подвергались критике и злобе,но это делало их сильнее.
3)не все люди могут победить в себе страх и сдержать боль перед смертью как это сделал извейстнейший казак разин
1) 6 (худший вариант - 5+1)
2) 4 (худший вариант - 3+1)
3) 7 (худший вариант - 5+2)
4) 5 (худший вариант - 3+2)
Популярные вопросы