В паскале1. Очистить строки s1, s2, s3. Убедиться, что они пустые (для этого можно вывести на экран дисплея длины строк). 2. С помощью функции copy из строки s4 выделить фамилию, имя, отчество студента и занести эти значения в строки s1, s2, s3 соответственно. Результат вывести на экран дисплеяи 2 программа после На основе имеющихся в программе строк сформировать строку s5 вида: ИВАНОВ И.И. То есть представить данные в формате: Фамилия студента и инициалы. Вывести сформированную строку на экран дисплея.
После выполнения этого кода на экране будут отображены длины строк s1, s2, s3, а также фамилия, имя, отчество студента из строки s4. Затем будет сформирована строка s5 в формате "Фамилия студента и инициалы" и выведена на экран.
Пример кода на Pascal:
program DataProcessing;var
s1, s2, s3, s4, s5: string;
surname, name, patronymic: string;
begin
s1 := '';
s2 := '';
s3 := '';
writeln('Длина строки s1: ', length(s1));
writeln('Длина строки s2: ', length(s2));
writeln('Длина строки s3: ', length(s3));
s4 := 'Иванов Иван Иванович';
surname := copy(s4, 1, pos(' ', s4) - 1);
delete(s4, 1, length(surname) + 1);
name := copy(s4, 1, pos(' ', s4) - 1);
delete(s4, 1, length(name) + 1);
patronymic := s4;
s1 := surname;
s2 := name;
s3 := patronymic;
writeln('Фамилия: ', s1);
writeln('Имя: ', s2);
writeln('Отчество: ', s3);
s5 := s1 + ' ' + copy(s2, 1, 1) + '.' + copy(s3, 1, 1) + '.';
writeln('Строка s5: ', s5);
end.
После выполнения этого кода на экране будут отображены длины строк s1, s2, s3, а также фамилия, имя, отчество студента из строки s4. Затем будет сформирована строка s5 в формате "Фамилия студента и инициалы" и выведена на экран.