класс. сделайте рисунок если не сложно)6. Для следующей задачи выполните рисунок, придумайте реше- ние и оформите его в виде схемы.
По каналу один за другим идут три теплохода: «Обь»,
Восток» и «Петропавловск». Навстречу им идут один за дру-
гим теплоходы: «Мир», «Енисей» и «Россия». Канал такой
ширины, что два теплохода в нём разойтись не могут. Но у
канала с одной стороны есть ответвление, в котором может
поместиться один теплоход. Как можно теплоходам разойтись
и продолжить свой путь?
Компьютерный практикум
Работа 10 «Строим диаграммы»
1)var
a:array[1..5]of integer;
i,n,s:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
writeln('Введите число');
s:=0;
for i:=1 to n do begin
read(a[i]);
if a[i]>0 then s:=s+a[i]
end;
writeln('Сумма положительных элементов массива равна ', s)
end.
2)var
a:array[1..10]of integer;
i,n,P:integer;
begin
writeln('Введите число элементов');
readln(n);
writeln('Введите число');
P:=1;
for i:=1 to n do begin
read(a[i]);
if a[i] mod 6 = 0
then P:=P*a[i]
end;
writeln('Произведение элементов массива кратных 6 равна ',P)
end.
3)var
a:array[1..5]of integer;
n,i:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
writeln('Введите число');
for i:=1 to n do begin
read(a[i]);
if a[i]>0 then begin
a[i]:=a[i]*3;
writeln('Новый элемент равен: ',a[i])
end;
if a[i]<=0 then begin
a[i]:=a[i]+5;
writeln('Новый элемент равен: ',a[i])
end;
end;
end.
Буду рад если отметишь мой ответ как лучший
Пояснение:
Нам дан путь к каталогу "Системное".
C:\Информатика\Программное обеспечение\Системное.
Из этого следует, что каталог "Системное" находится в каталоге "Программное обеспечение", который в свою очередь находится в каталоге "Информатика", который находится на диске C.
Подняться на один уровень вверх - это значит перейти в католог, который находится выше выбранного нами каталога.
Спуститься же на один уровень вниз - значит перейти в каталог который находится ниже выбранного нами каталога.
Вообще все эти каталоги можно рассмотреть как корни дерева: один толстый корень (диск С) начинает разделяться на многие другие корни (каталоги).
Исходя из этих пояснений решим задание.
C:\Информатика\Программное обеспечение\Системное.
Если мы поднимаемся на один уровень вверх, значит мы переходим из каталога "Системное" в каталог который находится выше, то есть в "Программное обеспечение".
Далее мы поднимаемся ещё на один уровень вверх: переходим из каталога "Программное обеспечение" в каталог "Информатика".
Далее мы опускаемся на один уровень вниз: из каталога "Информатика" переходим в каталог "7класс". И мы ещё раз опускаемся из каталога "7класс" в файл "Задания.doc".
Нам остаётся только выписать путь из диска С в файл "Задания.doc"
C:\Информатика\7класс\Задания.doc.
Вот и всё.
C:\Информатика\7класс\Задания.doc.
Вот и всё.
Если у Вас есть вопросы по заданию - можете задать их мне.
Удачи Вам! :)