Вопрос на тему "пользователь начал работу в каталоге работа 1" пользователь начал работу в каталоге работа 1. сначала он поднялся на один уровень вверх, затем спустился на один уровень вниз, потом ещё раз спустился на один уровень вниз. в результате он оказался в каталоге c: \2012\9 класс\таблицы. укажите возможный путь каталога, в котором пользователь начал работу. 1) c: \2012\текст\редактирование\работа1 2) с: \2012\работа1 3) с: \2012\текст\работа1 4) с: \работа1

👇

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

Ответ:

TurboDan

07.01.2023

2)С:\2012\Работа1

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

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

Ответ:

poeticclown

07.01.2023

Var a1,a2,a3,a4,a5,a6,a7,a8,k:integer;
begin
k:=0;
read (a1,a2,a3,a4,a5,a6,a7,a8);
if (a1>0) and (a2>0) and (a3>0) and (a4>0) and (a5>0) and (a6>0) and (a7>0) and (a8>0) then
begin
if (a1 mod 3 = 0) and (a1 mod 10 = 4) then k:=k+1;
if (a2 mod 3 = 0) and (a2 mod 10 = 4) then k:=k+1;
if (a3 mod 3 = 0) and (a3 mod 10 = 4) then k:=k+1;
if (a4 mod 3 = 0) and (a4 mod 10 = 4) then k:=k+1;
if (a5 mod 3 = 0) and (a5 mod 10 = 4) then k:=k+1;
if (a6 mod 3 = 0) and (a6 mod 10 = 4) then k:=k+1;
if (a7 mod 3 = 0) and (a7 mod 10 = 4) then k:=k+1;
if (a8 mod 3 = 0) and (a8 mod 10 = 4) then k:=k+1;
writeln (k);
end else
writeln ('Неверный ввод');
end.

4,5(32 оценок)

Ответ:

sab005

07.01.2023

Var
m, n, p, d: real;

begin
writeln('Введите d');
read(d);
writeln('Введите m,n,p');
read(m, n, p);
if (m = d) or (n = d) or (p = d) then
begin
if (m = d) then writeln('m = d');
if (n = d) then writeln('n = d');
if (p = d) then writeln('p = d');
if (m = d) and (n = d) then writeln('m,n = d');
if (m = d) and (p = d) then writeln('m,p = d');
if (p = d) and (n = d) then writeln('p,n = d');
end else
begin
writeln('Ни одно не равно d');
if ((d - m) > (d - n)) and ((d - m) > (d - p)) then writeln('(d-m) - максимальное');
if ((d - n) > (d - m)) and ((d - n) > (d - p)) then writeln('(d-n) - максимальное');
if ((d - p) > (d - m)) and ((d - p) > (d - n)) then writeln('(d-p) - максимальное');
if ((d - m) = (d - n)) and ((d - m) = (d - p)) and ((d - n) = (d - p)) then writeln('(d-m)=(d-n)=(d-p)');
end;
end.

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

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

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

18.09.2022

Как добавить кнопку Facebook на свой сайт: шаг за шагом...

Транспорт

14.01.2023

Как избежать аварий на дороге...

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

17.04.2020

Создание онлайн веб каста с помощью Windows Media Encoder...

Транспорт