PascalABC 9 класс даны две строки введите большую по длине строку сколько раз, на сколько символов отличаются строки
pb1036:
Непонятно. Допустим в одной строке 20 символов, в другой 12. Разница в 8 символов. Восемь раз большую строку действительно ввести с клавиатуры, или это описка и нужно вывести ее 8 раз? И второе, PascalABC - такого диалекта нет. Есть или PascalАВС.NЕТ, или Pascal АВС.
Ответы
Ответ дал:
0
Вот пример программы на PascalABC, которая считывает две строки и выводит большую по длине строку и разницу в их длинах:
С помощью этой программы вы можете ввести две строки, и она выведет большую строку и разницу в их длинах.
Приложения:
Это самый обычный Turbo Pascalю И потом, просили не разницу вывести, повторы строк
А PascalАВС.NЕТ - он вот:
##
var s1 := ReadlnString('1-я строка:');
var s2 := ReadlnString('2-я строка:');
var diff := s1.Length - s2.Length;
if diff > 0 then Print(diff * (s1 + NewLine))
else if diff < 0 then Print(-diff * (s2 + NewLine))
var s1 := ReadlnString('1-я строка:');
var s2 := ReadlnString('2-я строка:');
var diff := s1.Length - s2.Length;
if diff > 0 then Print(diff * (s1 + NewLine))
else if diff < 0 then Print(-diff * (s2 + NewLine))
Вас заинтересует
2 месяца назад
2 месяца назад
2 месяца назад
2 месяца назад
1 год назад
1 год назад
7 лет назад