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

Используя набор данных «Важнейшие судоходные каналы», составить таблицу и выяснить суммарную длину каналов, среднюю глубину каналов на фарватере, минимальную и максимальную ширину.
Важнейшие судоходные каналы
Волго-Балтийский водный путь имеет ширину 25-120 м. Южный канал находится во Франции. Панамский канал по¬строен в 1914 г. Суэцкий канал имеет длину 161 км. Кильский канал построен в 1895 г. Южный канал имеет глубину на фар¬ватере 2 м. Великий (Даюньхэ) канал находится в Китае. Канал Рона-Рейн имеет длину 320 км. Беломоро-Балтийский канал находится в России. Панамский канал имеет ширину 150-305 м. Береговой канал имеет длину 5580 км. Южный ка¬нал имеет длину 241 км. Волго-Балтийский водный путь имеет длину 1100 км. Канал Рона-Рейн имеет ширину 25-100 м. Су-эцкий канал находится в Египте. Панамский канал имеет дли¬ну 82 км. Береговой канал построен в 1972 г. Великий (Даюнь¬хэ) канал имеет длину 1782 км. Волго-Балтийский водный путь имеет глубину на фарватере 4 м. Среднегерманский канал имеет ширину 30-40 м. Кильский канал имеет ширину 104-214 м. Беломоро-Балтийский канал имеет глубину на фар¬ватере 5 м. Береговой канал находится в США. Суэцкий канал имеет глубину на фарватере 16 м. Панамский канал находится в Панаме. Панамский канал имеет глубину на фарватере 12 м. Кильский канал имеет длину 99 км. Беломоро-Балтийский ка¬нал построен в 1933 г. Береговой канал имеет ширину 40-60 м. Среднегерманский канал построен в 1938 г. Кильский канал имеет глубину на фарватере 11 м. Волго-Балтийский водный путь построен в 1810 г. Канал Рона-Рейн находится во Франции. Великий (Даюньхэ) канал имеет глубину на фарватере 2-3 м. Суэцкий канал имеет ширину 120-318 м. Среднегерманский канал находится в ФРГ. Южный канал построен в 1681 г. Канал Рона-Рейн имеет глубину на фарватере 2 м. Среднегерманский канал имеет длину 325 км. Беломоро-Балтийский ка¬нал имеет длину 227 км. Береговой канал имеет глубину на фарватере 3-13 м. Великий (Даюньхэ) канал построен в 13 в. Южный канал имеет ширину 20 м. Вол го-Балтийский водный путь находится в России. Среднегерманский канал имеет глу¬бину на фарватере 3-6 м. Суэцкий канал построен в 1869 г. Ве¬ликий (Даюньхэ) канал имеет ширину 40-350 м. Кильский ка¬нал находится в ФРГ. Канал Рона-Рейн построен в 1833 г.

👇
Открыть все ответы
Ответ:
olga810706
olga810706
11.02.2022
Uses GraphABC;
var a,b,c:array[10..99] of integer;
 ast,bst,cst:string;
 i:integer;
begin
ast:='A:';
bst:='Б:';
cst:='В:';
for i:=10 to 99 do
begin
c[i]:=i;
a[i]:=c[i]-i+random(50);
b[i]:=c[i]-a[i];
ast:=ast+' '+inttostr(a[i]);
bst:=bst+' '+inttostr(b[i]);
cst:=cst+' '+inttostr(c[i]);
end;
setpencolor(clRed);
line(0,0,150,0);
line(150,0,75,50);
line(75,50,0,0);
rectangle(0,50,150,300);
DrawTextCentered(0,50,150,300,ast);
setpencolor(clYellow);
line(150,0,300,0);
line(300,0,225,50);
line(225,50,150,0);
rectangle(150,50,300,300);
DrawTextCentered(150,50,300,300,bst);
setpencolor(clGreen);
line(300,0,450,0);
line(450,0,375,50);
line(375,50,300,0);
rectangle(300,50,450,300);
DrawTextCentered(300,50,450,300,cst);
end.
4,6(56 оценок)
Ответ:
gennadiiyy
gennadiiyy
11.02.2022
//Видимо, это одна задача, так как "изменения" во второй не указаны
//Pascal ABC.NET v3.1 сборка 1172

Const
 n=20;

Var
 ar:array[1..n] of integer;
 i:integer;
begin
 randomize;
 writeln('First array:');
  for i:=1 to n do
   begin
    ar[i]:=random(10)-3;
    write(ar[i]:4);
    if ar[i]>0 then ar[i]:=ar[i]*2 else ar[i]:=0;
   end;
 writeln;
 writeln('Final array:');
  for i:=1 to n do
   write(ar[i]:4);
end.

Пример работы программы:
First array:   2  -3   5   6  -3  -3   1  -2  -3   1   3  -3   4  -3   1  -1   6   6   2   3
Final array:   4   0  10  12   0   0   2   0   0   2   6   0   8   0   2   0  12  12   4   6
4,6(95 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ