От 1. Задание Пользователь находился в каталоге Расписание. Сначала он поднялся на один
уровень вверх, затем спустился на один уровень вниз, потом ещё раз спустился на один уровень
вниз. В результате он оказался в каталоге
С:\учёба\математика\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С:\учёба\2013\Расписание
2) С:\учёба\Расписание
3) С:\Расписание
4) С:\учёба\математика\Расписание
2. Задание Пользователь находился в каталоге Расписание. Сначала он поднялся на один
уровень вверх, затем ещё раз поднялся на один уровень вверх, потом спустился на один уровень
вниз. В результате он оказался в каталоге
С:\учёба\математика\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С:\учёба\Расписание
2) С:\учёба\математика\Расписание
3) С:\учёба\2013\Расписание
4) С:\учёба\математика\2013\Расписание
3. Задание. Пользователь находился в каталоге Расписание. Сначала он поднялся на один
уровень вверх, затем спустился на один уровень вниз, потом ещё раз спустился на один уровень
вниз. В результате он оказался в каталоге
С:\учёба\химия\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С:\учёба\химия\Расписание
2) С:\учёба\2013\Расписание
3) С:\учёба\Расписание
4) С:\Расписание
4. Задание . Пользователь находился в каталоге Расписание. Сначала он поднялся на один
уровень вверх, затем спустился на один уровень вниз, потом ещё раз спустился на один уровень
вниз и ещё раз спустился на один уровень вниз. В результате он оказался в каталоге
С:\учёба\химия\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С:\учёба\химия\Расписание
2) С:\Расписание
3) С:\учёба\2013\Расписание
4) С:\учёба\Расписание
5. Задание Пользователь находился в каталоге Расписание. Сначала он поднялся на один
уровень вверх, затем спустился на один уровень вниз, потом ещё раз спустился на один уровень
вниз. В результате он оказался в каталоге
С:\учёба\информатика\ГИА.
Укажите полный путь каталога, с которым пользователь начинал работу.
1) С:\учёба\2013\Расписание
2) С :\учёба\информатика\Расписание
3) С:\Расписание
4) С:\учёба\Расписание

👇

Увидеть ответ

Ответ:

07Лизочек07

30.04.2021

не знаю спс за

4,4(44 оценок)

Открыть все ответы

Ответ:

raku13

30.04.2021

В задании не сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. Сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. Это позволит заодно осуществить контроль ввода.

var
n,s,t,i:integer;
begin
Write('Укажите количество данных: ');
Read(n);
Writeln('Теперь вводите данные');
s:=0;
for i:=1 to n do
    begin
    Read(t);
    s:=s+t
    end;
Writeln('Средняя температура за месяц составила ',s/n:0:1)
end.

Пример решения

Укажите количество данных: 11
Теперь вводите данные
27 29 26 31 24 23 27 30 31 28 25
Средняя температура за месяц составила 27.4

4,4(48 оценок)

Ответ:

00099000

30.04.2021

1. Задача решается с стека (алгоритм Дейкстры для обработки обратной польской записи). Предполагается, что во вводимой строке содержится корректное выражение, удовлетворяющее условиям задания.

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
var w:=ReadlnString.ToWords;
var St:=new Stack <integer>;
var r:=0;
foreach var t in w do
    if t[1].IsDigit then St.Push(t.ToInteger)
    else begin
      var a:=St.Pop;
      var b:=St.Pop;
      case t[1] of
      '+':St.Push(a+b);
      '-':St.Push(b-a);
      '*':St.Push(a*b)
      end;
    end;
Writeln(St.Pop)
end.

Контрольный пример
8 9 + 1 7 - *
-102

2. Задача крайне просто решается при регулярного выражения с рекурсией. Фактически вводить количество шаров не нужно, поэтому после ввода оно отбрасывается.

// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
Writeln(ReadlnString.ToWords.Skip(1).JoinIntoString('').
      MatchValue('(.)\1{2,}').Length);
end.

Контрольный пример
5 2 3 3 3 1
3

4,4(14 оценок)

Это интересно:

Компьютеры-и-электроника

10.01.2020

Как стать рыцарем класса Sheath в игре Elsword: полный гайд для начинающих игроков...

Образование-и-коммуникации

02.07.2021

Как решать квадратные неравенства...

Компьютеры-и-электроника

24.01.2023

Как создать кухню в Minecraft...

Взаимоотношения