• Даны 2 строки символов: S1 и S2. Узнать, которая строка короче путем определения и сравнения длин строк. Результаты выдать на экран. Паскаль!!!!

Ответы 4

  • Спасибо!
    • Автор:

      aleah
    • 6 лет назад
    • 0
  • Спасибо!
    • Автор:

      bailey58
    • 6 лет назад
    • 0
  • Текст программы + скрин с примером выполнения программы.Program Stroki;var S1,S2 : string[250];beginwriteln('Введите 1-ю строку: ', S1);Readln(S1);writeln('Введите 2-ю строку: ', S2);Readln(S2); if Length(S1)>Length(S2)  then writeln('Длиннее строка 1')   else    if Length(S1)<Length(S2)  then writeln('Длиннее строка 2')  else writeln('Длины строк равны')end.
    answer img
  • var s1,s2:string; l1,l2:integer;beginreadln(s1);readln(s2);l1:=length(s1);l2:=length(s2);if l1<l2 then writeln('1-я строка короче')else if l2<l1 then writeln('2-я строка короче') else writeln('Строки имеют одинаковую длину'); end.Пример:programvar2-я строка короче
    answer img
    • Автор:

      brewster
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years