С клавиатуры вводятся любые симворлы. Программа должна преобразовать вводимые символы,заменив все английские буквы одноимёнными большими (другие символы не преобразовывать) Ввод символов прекращается, если введён символ*// Напишите, пожалуйста программу.
Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1381 от 04.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
s:=s.Select(c->c in ['a'..'z']?UpCase(c):c).JoinIntoString('');
Writeln(s)
end.
Пример
My flowers are beautiful! But your's?
MY FLOWERS ARE BEAUTIFUL! BUT YOUR'S?
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString;
s:=s.Select(c->c in ['a'..'z']?UpCase(c):c).JoinIntoString('');
Writeln(s)
end.
Пример
My flowers are beautiful! But your's?
MY FLOWERS ARE BEAUTIFUL! BUT YOUR'S?
Ответ дал:
0
Вот задания выложили - пишут конкретно - Паскаль АВС. Вот там так не напишешь, тоже версия 10-летней давности, но я и браться не стану, потому что в вопросе сразу сказано, как.
Вас заинтересует
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад