Саша хочет ввести символ и вывести его, добавив по "1" слева и справа от него. Помогите ему в этом нелегком деле. )
Формат ввода: вводится символ
Формат вывода: надо вывести "1" символ "1"
Пример ввода: L
Пример вывода : 1L1

я забыла uses crt и clrscr убери

а s3 это переменная, просто имя

Нет, вопрос в том, зачем указано :4 после s3 ?

ну,приаычка у меня,чтобы не смешивать

Вы не для себя пишете, а решаете задание автору вопроса. Как он потом должен объяснять это Ваше :4 ?

var  c:char;begin  Write('Введи символ: '); Readln(c);  Writeln('1',c,'1')end.Тестовое решение:Введи символ: L1L1

program primer;uses crt;vara:char;s1,s2,s3:string;begin clrscr;writeln('vvedite simvol');readln(a);s1:='1';s2:=a;s3:=s1+s2+s1;writeln(s3:4);end.но я бы попрощепосле readln(a);writeln(1,'a',1);end.