Похожие вопросы
2024-11-30 19:11:58
1. Составить программу, которая определяет, какая из двух фамилий длиннее. Фамилии имеют разную длину (вывести на экран длинную фамилию).
2. Какое значение будет у переменной S после выполнения следующих операций:
S1:='колонна'; S2:='профессор'; K1:=copy(S1,1,2);
K2:=copy(S1,6,2);
K3:=copy(S2,2,2); S:=concat(K1,K3,K2);
Информатика 9 класс Программирование программа для сравнения фамилий определение длины строки работа с переменными в Паскале операции со строками копирование подстрок конкатенация строк алгоритмы в информатике
2024-12-01 19:59:09
Привет! Давай разберёмся с твоими вопросами.
1. Программа, которая определяет, какая из двух фамилий длиннее:
program LongSurname;
var
surname1, surname2: string;
begin
write('Введите первую фамилию: ');
readln(surname1);
write('Введите вторую фамилию: ');
readln(surname2);
if length(surname1) > length(surname2) then
writeln('Длинная фамилия: ', surname1)
else
writeln('Длинная фамилия: ', surname2);
end.
Эта программа попросит ввести две фамилии и выведет ту, которая длиннее. Просто, но эффективно!
2. Значение переменной S после выполнения операций:
- S1:='колонна'; (это строка "колонна")
- S2:='профессор'; (это строка "профессор")
- K1:=copy(S1,1,2); (это будет "ко", потому что мы берём первые 2 символа из "колонна")
- K2:=copy(S1,6,2); (это будет "на", потому что берём символы с 6 по 7 из "колонна")
- K3:=copy(S2,2,2); (это будет "ро", потому что берём символы с 2 по 3 из "профессор")
- S:=concat(K1,K3,K2); (это объединит "ко", "ро" и "на")
В итоге, значение переменной S будет "корона".
Если что-то непонятно, спрашивай! Всегда рад помочь!