Алалалалалалалалалалалалаллаалалаллалалалаалалал
График Скорость Время
а 200км/ч 30 минут
b 100км/ч 1 час
c 25 км/ч 4 часа
d 16,66 км/ч 6 часов
е 5км/ч 6 часов
Const n=7;
var a:array[1..n] of integer;
i,s:integer;
begin
Randomize;
for i:=1 to n do
begin
a[i]:=random(50);
write(a[i]:4);
end;
writeln;
s:=0;
for i:=1 to n do
if a[i] mod 7 <> 0 then s:=s+a[i];
writeln('s = ',s);
end.
Пример:
26 37 12 38 21 45 19
s = 177
Один байт-8 цифр.128 64 32 16 8 4 2 1. Суммируй до той степени, пока не выйдет твое число. на месте использованных цифр ставь 1, вместо неиспользованных 0. число 137- 10001001