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

Зчисла книг ,що надійшли до бібліотеки ,60 % складали підручники, 2/9 словники ,а решту - художня література .скільки всього книг надійшло до бібліотеки? ​

👇
Открыть все ответы
Ответ:
nairchik
nairchik
28.05.2021

Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Знакомьтесь с клавиатурой Gboard! Здесь будет сохраняться текст, который вы копируете.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Нажмите на фрагмент, чтобы вставить его в текстовое поле.Чтобы закрепить фрагмент, нажмите на него и удерживайте. Незакрепленные объекты будут удалены через час.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования.Чтобы закреплять, добавлять или удалять фрагменты, используйтея.Чтобы закреплять, добавлять или удалять фрагменты, используйте значок редактирования

4,5(37 оценок)
Ответ:
Jelinad
Jelinad
28.05.2021
Program long;
 uses Crt;
 const n=5;
 type Vec=array [1..n] of integer;
 var A, B, C: Vec;
     i,j,k, Col: integer;
     Pro: longint;
     a1, a2: integer;
begin
 ClrScr;
 Randomize;
 Col:=1;  Pro:=1;
 WriteLn ('Massiv A:');
 for i:=1 to n do
   begin
     A[i]:=500+random(2000);
     Write(A[i]:6);
     if A[i] >1000 then
        begin
          B[Col]:=A[i]; Col:=Col+1;
        end;
   end;  WriteLn;
 Col:=Col-1;  WriteLn;
 WriteLn ('Massiv B:');
 for i:=1 to Col do
   WriteLn(B[i]);
 WriteLn;
 k:=1;
 for i:=1 to n do
   begin
       a2:=B[i] mod 10;
       a1:=B[i] div 1000;
       if sqr(a1)<sqr(a2) then
           begin
              C[k]:=B[i];
              k:=k+1;
           end;
   end;
 for i:=1 to k-1 do
     Pro:=Pro*C[i];
  WriteLn ('Pro=',Pro);
ReadLn;
end.
4,6(85 оценок)
Новые ответы от MOGZ: Математика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ