Program RD;Var X:array [0..15] of real ;i:integer ;Begin X[i]:=random(32)-7;end.
В двоичной системе исчисления 1+1=10 (Ответ:b)
Я считал в паскале .Ответ :5
№6
program m;
var
a, max, pupils, i: integer;
ifNoanswer: boolean;
begin
ifNoanswer:=false;
a:=0;
№7 в комментах как только напишу
max:=0;
readln(pupils);
for i:=1 to pupils do
begin
readln(a);
if a>max then
max:=a
else if a=0 then
ifNoanswer:=true;
end;
writeln(max);
if ifNoanswer=false then
writeln('NO')
else
writeln('YES');
end.
Дано:
t1 = 3 сек
t2 = 2 сек
t3 = 3 сек
S = 205 страниц
Найти:
Т - ?
Решение:
1) 3 + 2 + 3 = 8 сек нужно для обработки одной страницы текста
2) 205 × 8 = 1640 сек нужно для обработки всего текста
Переведем секунды в минуты:
1640 / 60 = 27,33 мин нужно для ввода в память компьютера 205 страниц текста
Ответ: 1640 сек или 27,33 мин нужно для ввода в память компьютера 205 страниц текста романа А.Дюма "Три мушкетера"