М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
мария22228
мария22228
09.02.2020 03:45 •  Информатика

Три пятиклассницы ана ева и лиза одинакого быстро и хорошо умеют набирать текст на компьюторе.если любые две из этих девочек будут работать одновременно,то смогут напечатать материалы для кольной газеты за час.сколько времмени они потратят на эту работу,если будут выполнять её все троя вместе? (ответ в форме: ана 20 ева 30 лиза 40 за 2 часа(примерно)

👇
Ответ:
helpme177
helpme177
09.02.2020
Каждая девочка  -  х; 1 час = 60 мин
2х = 60 
х = 30
3х = 90, 
90 - 60 = 30
60 - 30 = 30
ответ: полчаса
но я не уверена в решении
Ну а так я задачу решила
удачи
4,4(31 оценок)
Открыть все ответы
Ответ:
каринка195
каринка195
09.02.2020
Const
  N = 5;
  L = 8;

var
  K: array[1..N, 1..L] of integer;
  i, j, p: integer;

begin
  Randomize;
  for i := 1 to N do
  begin
    for j := 1 to L do
    begin
      K[i, j] := random(100) - 50;
      write(K[i, j]:5);
    end;
    writeln
  end;
  p:=0;
  for i := 1 to N do
    for j := 1 to L do
      if (K[i, j]<0) and (K[i,j] mod 3=0) then p:=p+1;
  writeln('Найдено отрицательных элементов, кратных трем: ',p)
end.

Тестовое решение:

   27   42    0   25  -49   41  -16  -14
  -26  -29   27  -16   10  -16   17   18
   -4   10   17  -26   45  -23   48  -44
  -47   28   25   -1  -31   24   35  -47
  -39   49  -48   29  -42    2   -6   32
Найдено отрицательных элементов, кратных трем: 4
4,4(68 оценок)
Ответ:
gabenew
gabenew
09.02.2020
Program Array129;
var
a: array [1..40] of integer;
B: array [1..20] of integer;
C: array [1..20] of integer;
temp,M,N,i,j:integer;
begin
writeln('Введите N (N<=20)');
readln(N);
writeln('Значения массива А');
for i:=1 to n do begin write('a[',i,']=');readln(A[i]); B[i]:=i; end;
// решение 
temp:=0;
m:=0;
// формируем из исходного массива A[] два с длиной серий B[] и значением серий C[] 
for i:=2 to n do
begin
inc(temp);
if a[i]<>a[i-1] then
begin
inc(M);
B[M]:=temp;
C[M]:=a[i-1];
temp:=0;
end;
end;
inc(temp);
inc(M);
b[M]:=temp;
C[M]:=a[i];
// складываем массив A[] согласно задания. 
temp:=1;
for i:=1 to m do
begin
if b[i]>=b[temp] then
begin
temp:=i;
end;
end;
inc(b[temp]);

temp:=0;
for i:=1 to m do
begin
for j:=1 to b[i] do
begin
inc(temp);
a[temp]:=c[i];
end;
end;
Writeln;
Writeln('ответ');
Write(' A[]: '); for i:=1 to temp do Write(A[i],' ');
end.
4,4(50 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ