4. Пользователь работал с каталогом С:\Литература\Лермонтов\Произведения. Сначала он поднялся на один уровень вверх, затем спустился в каталог Грушницкий, затем поднялся на два уровня вверх. Укажите полный путь каталога, в котором оказался пользователь. *
С:\Литература\Лермонтов\Грушницкий
С:\Лермонтов\Грушницкий
С:\Литература

👇

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

Ответ:

dima1025

01.06.2020

С:\Литература\Лермонтов\Грушницкий

Объяснение:

4,7(30 оценок)

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

Ответ:

alexgettx

01.06.2020

Был на свете человек он был обичный как все любил призидента и был нормальным но один раз когда он пошоо гулять с друзьями он упал в яму наткнувшись на блок он кго тронул и о него было видение потом его нашли копы работающие на призедента они розказали ему что Президент взорвет мир и только он мон мир с блока его хотели питать но пришел парень который его началась погоня и парень понял (его звали Дикарь) что человек (он де Эммет) не избранный продалдалась погоня и коп вистрельнул в Эммета пушкой (котороя не взривала а прилипила жучка)
Коп их стрелял но бэтмен их они полетели в Заоблачную даль
К другим крутим людям которие б им мир но из-за жучка прилетели копы и взорвали Заоблачную даль всех посадили в тюрмю но банда Эммета уцелела они пошли к Президенту гле их ожидали и словили все билы без но Эммет вибралса гле подертвовал собой для других и они закончили то что Эммет начал надавали люлей Президенту и копам и мир не взорвался а Эммет вижил!
Конец!

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

Ответ:

kholdingmedia

01.06.2020

Const
n=7;
type
V=array[1..n] of real;
procedure mReplace(t:real;var a:V;var k:integer);
var
i:integer;
begin
k:=0;
for i:=1 to n do
    if a[i]<t then begin a[i]:=t; Inc(k) end
end;

var
T:real;
i,k1,k2:integer;
P,C:V;
begin
Write('Введите значение T: '); Read(T);
Writeln('Введите элементы массива P');
for i:=1 to n do Read(P[i]);
Writeln('Введите элементы массива C');
for i:=1 to n do Read(C[i]);
mReplace(T,P,k1); mReplace(T,C,k2);
if k1>k2 then
begin
    Writeln('Измененнный массив Р'); for i:=1 to n do Write(P[i],' ')
end
else
    if k2>k1 then
begin
    Writeln('Измененнный массив C'); for i:=1 to n do Write(C[i],' ')
end
else Writeln('Число замен в массивах равно ',k1)
end.

Тестовое решение:
Введите значение T: 0.005
Введите элементы массива P
0.001 1.54 -2.75 0.002 -0.1 1.2 -0.47
Введите элементы массива C
-5.74 0.0001 4.1 7.24 -1.5 2.9 0.004
Измененнный массив Р
0.005 1.54 0.005 0.005 0.005 1.2 0.005

4,8(94 оценок)

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

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

15.08.2020

Лучшие способы наблюдения за звездами с комфортом...

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

08.01.2022

Как превратить видео в живые обои на Android...

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

26.09.2021

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

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