Комментарии: Решаем задачи Абрамян на Паскале. String16

Автор: Bronislav

Bronislav — Sat, 23 Jun 2018 07:55:04 +0000

program string_14; //PascalABC.NET

begin
  var s := 'ABCDEFGHIJKLMNOPQRSTUVWXYZ';
  
  for var i := 1 to s.Length do
    if s[i] in ['A'..'Z'] then
      s[i]:=s[i].ToLower;
  
  s.Println; //abcdefghijklmnopqrstuvwxyz
end.

program string_14; //PascalABC.NET

begin

var s := 'ABCDEFGHIJKLMNOPQRSTUVWXYZ';

for var i := 1 to s.Length do

if s[i] in ['A'..'Z'] then

s[i]:=s[i].ToLower;

s.Println; //abcdefghijklmnopqrstuvwxyz

end.

Автор: Maston Sabraliev

Maston Sabraliev — Wed, 09 May 2018 13:07:19 +0000

Решение на Java от новичка

int i,t;
    String L,s="";
    Scanner sc=new Scanner(System.in);
    L=sc.nextLine();
    for(i=0; i<L.length(); i++)
        if((L.charAt(i)>='A')&&(L.charAt(i)<='Z')){
          t=(int)(L.charAt(i))+32;
              s=s+(char)(t);
        }
    else
            s=s+L.charAt(i);
    
     System.out.println(s+" ");

int i,t;

String L,s="";

Scanner sc=new Scanner(System.in);

L=sc.nextLine();

for(i=0; i<L.length(); i++)

if((L.charAt(i)>='A')&&(L.charAt(i)<='Z')){

t=(int)(L.charAt(i))+32;

s=s+(char)(t);

}

else

s=s+L.charAt(i);

System.out.println(s+" ");

Автор: vombat

vombat — Mon, 16 Apr 2018 13:31:17 +0000

Решение на Python:

def UpperLat(msg):
    input_string = input(msg)
    output_string = ""
    for char_counter in range(0, len(input_string)):
        if 65 <= ord(input_string[char_counter]) <= 90:
            output_string += input_string[char_counter].lower()
        else:
            output_string += input_string[char_counter]
    return output_string

StrinG = UpperLat("Введите строку:")
print(StrinG)

def UpperLat(msg):

input_string = input(msg)

output_string = ""

for char_counter in range(0, len(input_string)):

if 65 <= ord(input_string[char_counter]) <= 90:

output_string += input_string[char_counter].lower()

else:

output_string += input_string[char_counter]

return output_string

StrinG = UpperLat("Введите строку:")

print(StrinG)