Периферийное устройство под названием веб-камера
1)182(10 снизу)
2)196(10 снизу)
3)293(10 снизу)
4)55(10 снизу)
Var
a,b,c:Integer;
Begin
Read(a,b,c);
if (a*b > c*2-b) then Writeln(a+b)
else Writeln(b+c);
end.
Держи, если надо больше объяснений - напиши мне:
begin
var a, b:integer; //Объявляем a и b
readln(a,b); //Считываем их
for var i := 1 to 5 do write(random(b - a) + a, ' '); //Выводим рандомные числа от a до b
writeln; //Переносим строку
end.
...
Если не сложно нажми "Спасибо" ;)
30 байт, т.к 1 символ=8 бит, I=8*30=240 бит =>240/8=30 байт