В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
НяФФкА555
НяФФкА555
15.04.2020 23:51 •  Информатика

Составьте программу, которая : в строке "я учусь в школе" заменяет слово "в школе" на " в 10-м классе".

Показать ответ
Ответ:
tanushkako
tanushkako
25.05.2020 22:40

Program 1;
Uses CRT;
Var
s: String;
Begin
Writeln('Введите фразу');
read(s);
if (s='Я учусь в школе') then
writeln ('Я учусь в 10-м классе')
end.

0,0(0 оценок)
Ответ:
Сирена11111
Сирена11111
25.05.2020 22:40

var
  s: string;

begin
  s:= 'Я учусь в школе';  //Присваиваем начальное значение строковой переменной
  writeln(s);  //Печатаем начальное значение
  Delete(s, 11, 5);  {Удаляем из строки s, начиная с 11 позиции 5 символов (т.е. удаляем слово школа)}
  Insert('10-м классе', s, 11);  {Вставляем строку '10-м классе' в строку s, начиная с 11 позиции}
  writeln(s);  //Печатаем получившуюся строку
end.

  

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота