logo
Вход Регистрация Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
vasta5555555
vasta5555555
03.12.2021 23:36 •  Информатика

Пользователь работал с каталогом d: \программы\игры\квесты. сначала он поднялся на 1 уровень вверх, затем спустился в каталог стратегии, после чего спустился в каталог фараон. каков полный путь к каталагу, в котором оказылся пользователь? для справки: раб. тетрадь босова номер 107, кто может и 109, 110

👇
Увидеть ответ
Ответ:
Okama
Okama
03.12.2021

D:/ПРОГРАММЫ/ИГРЫ/СТРАТЕГИИ/ФАРАОН

4,5(87 оценок)
Открыть все ответы
Ответ:
azs194karelin
azs194karelin
03.12.2021
var  mas1, mas2: array[0..9] of integer;  t, k, i, j: integer; 
begin  
readln(t);  
readln(k);  
for j := 0 to 1 do  begin   
      if (j = 1) then writeln();        
                 for i := 0 to 9 do    begin      
                          if(j = 0) then begin       
                                  mas1[i] := random(100);        
                                    write(mas1[i], ' ');       
                                    if mas1[i] > t Then mas1[i] := mas1[i] + 4;      
                              end      
                            else 
                               begin       
                                      mas2[i] := random(100);        
                                      write(mas2[i], ' ');       
                                       if mas2[i] > 10 * K Then         
                                            mas2[i] := mas2[i] + K;      
                                end;    
                       end;       
                  for i := 0 to 9 do     
                         if (j = 0) then 
                               write(mas1[i]) 
                        else 
                                write(mas2[i]);    
               writeln();  
           end;  
readln();
end.

))
4,7(48 оценок)
Ответ:
Ростислав111л
Uses Crt;
const
  n=10;
var
  a,b:array[1..n] of integer;
  i,k,t:integer;
begin
  ClrScr;
  Randomize;
  for i:=1 to n do begin
    a[i]:=Random(50);
    Write(a[i],' ')
    end;
  Writeln;
  for i:=1 to n do begin
    b[i]:=Random(50);
    Write(b[i],' ')
    end;
  Writeln;
  Write('k t='); Read(k,t);
  for i:=1 to n do begin
    if a[i]>t then a[i]:=a[i]+4;
    Write(a[i],' ')
    end;
  Writeln;
  for i:=1 to n do begin
    if b[i]>10*k then b[i]:=b[i]+k;
    Write(b[i],' ')
    end;
  Readkey
end.

Тестовое решение:
1 6 23 12 47 1 44 24 6 18
31 30 30 29 0 3 43 32 46 21
k t=2 20
1 6 27 12 51 1 48 28 6 18
33 32 32 31 0 3 45 34 48 23
4,5(92 оценок)
Это интересно:
К
Как построить боевого робота класса Antweight...
О
Как правильно раскладывать числа: краткое руководство для начинающих...
К
Простой и вкусный рецепт шоколадных конфет без лишнего хлопота...
К
Как заказать кофе в Макдональдсе: простое руководство для настоящих любителей кофе...
К
Как проверить файл подкачки в Linux: все, что вы должны знать...
Ф
Как купить марки, не выходя из дома: советы и рекомендации...
И
Как скрыться: лучшие способы оставаться невидимым...
К
Как удалить iSearch AVG - подробная инструкция...
М
Мир-работы
10.03.2021
Как организовать свое офисное пространство...
К
Как легко изменить свой идентификатор Apple ID...
Новые ответы от MOGZ: Информатика
anastasyabesso1
anastasyabesso1
19.03.2021
с какой панели инструментов вы можете установить графический инструмент...
анна2170
анна2170
19.08.2020
:екіпаж піратського корабля: одноногий капітан,кілька матросів,кок та декілька котів. у всіх них разом 15 голів і 41 ніг і лап. скільки на кораблі котів?...
Sawensia
Sawensia
19.08.2020
Вэлектронной таблице значение формулы =cpзнач(а1: b4) равно 3.чему равно значение ячейки а4, если значение формулы =сумм(а1: b3) равно 30, а значение ячейки в4 равно 5?...
anitayun0518
anitayun0518
23.02.2020
Три минута записи цифрового аудиофайла занимает на дис¬ке 2,6 Мб, разрядность звуковой платы - 16. С какой частотой дискретизации записан звук?...
888DeLtApLaN888
888DeLtApLaN888
21.05.2021
Можете написать конспект по теме из видео урока КАК РАБОТАЮТ ПОИСКОВЫЕ СИСТЕМЫ...
yanaoneshko562
yanaoneshko562
06.12.2022
задание 1-5 скорее от этого зависит оценкаа...
teeqo777
teeqo777
14.04.2021
Л 6. Для следующей задачи выполните рисунок, придумайте реше- ние и оформите его в виде схемы. По каналу один за другим идут три теплохода: «Обь», Восток» и «Петропавловск». Навстречу...
kotyatavspalne
kotyatavspalne
30.11.2022
Выбери атрибут, который задает цвет текста с Тkinter Python. foreground (fg) background (bg) height width...
Mmaal
Mmaal
13.03.2020
Из каких разделов состоит сообщение электронной почты?​...
kozlov20041
kozlov20041
10.02.2020
Есть пятизначное число, которое при делении на 15 даёт в остатке 13, а при делении на 13 даёт в остатке 9. Найдите все такие числа...

MOGZ ответил

Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
О НАС
ПОМОЩЬ
App
.
.
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ