Строки

@Dline5 · Регистрация: 22.11.2014

Author24 — интернет-сервис помощи студентам

Pascal

PROGRAM  stroka1;
VAR             
Х:String;          
                     А:integer ;        
BEGIN
                     X:= ‘Tleukabil’;
              A:= Length(X);
Writeln (‘A=’,A);   Readln  END.

Нужно вывести на экран X:= ‘Tleukabil’;

@Puporev · 22.02.2015, 17:06

Delphi

PROGRAM  stroka1;
VAR X:String;
    A:integer ;
BEGIN
X:='Tleukabil';
A:= Length(X);
Writeln ('X=',X,'  A=',A);
Readln
END.

	22.02.2015, 17:06

Строки

Решение