Pavel_Olegovna1601
?>

Turbo pascal. путем копирования и склейки из слова 'путеводитель' получить слова: водитель, путь, дело, дети.

Информатика

Ответы

daskal83
Program n_1;var s, s1, s2, s3, s4, s5, s6, s7, s8: string;begin
s:='путеводитель';
s1:=s;delete(s1, 1, 4);
s2:=s;delete(s2, 4, 8);
s3:=copy(s, 7, 1);s4:=copy(s, 4, 1);s5:=copy(s, 11, 1);s6:=copy(s, 6, 1);
s7:=s3+s4+s5+s6;
s3:=copy(s, 7, 1);s4:=copy(s, 4, 1);s5:=copy(s, 3, 1);s6:=copy(s, 8, 1);
s8:=s3+s4+s5+s6;
writeln(s1, ' ', s2, ' ', s7, ' ', s8, ' ');
end.
Yurevna419

Пойдет?

1)

// этажей<6 лифта нет, до 9 этажей 1 лифт, более 9 2 лифта

//По известным количеством этажей определить, сколько лифтов необходимо установить в доме.

program v1;

var n,m:integer;

  begin

    writeln('Введите количество этажей'); readln(n);

    m:=n;

    if m<6 then writeln('Лифта нет');

    if (m>=6) and (m<=9) then writeln('1 лифт');

    if m>=10 then writeln('2 лифта');

  end.

2)

//рейсы 107, 201, 32. Самолеты этих рейсов находятся на стоянках с номерами 3, 4, 5 соответственно.  

//По известному номеру рейса определить, на какую стоянку необходимо отправить багаж пассажиров.

program v1;

var n,m:integer;

 begin

   writeln('Введите номер рейса'); readln(n);

   m:=n;

   if m=107 then writeln('Стоянка с номером 3');

   if m=201 then writeln('Стоянка с номером 4');

   if m=32 then writeln('Стоянка с номером 5');

   if (m<>107) and (m<>201) and (m<>32) then writeln('Таких рейсов нет');

 end.


Кто шарит в решить 2 задачи, отблагодарю в Только скиньте весь код, хочу разобрать. Задача 1. По стр
Кто шарит в решить 2 задачи, отблагодарю в Только скиньте весь код, хочу разобрать. Задача 1. По стр
irina25095462

Объяснение:

Меня зовут ……... Мне …… лет. Я учусь в …… классе, в городе ………………. Моя школа самая лучшая. Школа четырёхэтажная. На первом этаже занимаются школьники начальных классов. В нашей школе есть большой спортивный зал. В нём проходят уроки физкультуры и разные спортивные соревнования. В актовом зале мы встречаем праздники. Все кабинеты у нас светлые и просторные. В кабинетах физики и химии есть лаборатории, где мы делаем опыты. В кабинете информатики стоят новые компьютеры. Ученики нашей школы часто побеждают в городских олимпиадах. В школе работают очень хорошие учителя. Каждый из них всегда интересно проводит урок. Нашего классного руководителя зовут ……………………………. Она преподаёт русский язык и литературу. Благодаря ей наш класс самый дружный и образцовый. Мы часто всем классом на выходных ходим в кино, театры, музеи и на выставки. Когда начинаются каникулы, я скучаю по школе. Я очень люблю свою школу.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Turbo pascal. путем копирования и склейки из слова 'путеводитель' получить слова: водитель, путь, дело, дети.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kashihina
Alena824
rinata542
olesya-cat8601
bestxbox
Georgievich-Zamudinovna2003
Есартия52
evageniy79
Bella Sergei
Никита227
Yekaterina_Popova1413
bal4shovser16
baranova302
dp199088206
Columbia777