Var i,max:integer;
a:array[1..40]of integer;
begin
max:=-1;
writeln('Введите значения членов массива');
for i:=1 to 40 do begin
readln(a[i]);
if (a[i] mod 8 =7) and (a[i]>max) then max:=a[i];
end;
if (max<>-1) then writeln('Максимальное число:',max) else writeln('Чисел по заданному параметру нет');
end.
Учитывая, что проводная мышь старше беспроводной на 50-10=40 лет, то для нашего условия нужно чтобы беспроводной исполнилось столько же. Через 30 лет проводной мыши будет 30+50=80 лет, а беспроводной 10+30=40 лет. 80/40=2.
Ответ:
Похоже на вирус
Объяснение:
Возможно было скачивание на вирусных сайтах
1) -
2)1
3) 8*10=80 придет работников
8*4=32 уйдут по разным причинам
всего 50+80-32=98
ответ: 2
4) 2 -вычитание
5) 3 - т.к из B можно попасть в E , а из A можно попасть в C