Программирование в паскале:
1.1 Даны 2 слова. Определить, какое из двух слов длиннее и на сколько.
1.2 Записано предложение. По последнему символу определить тип предложения. (повествовательное, вопросительное или восклицательное)
1.3 Поменять в слове первую и последнюю буквы

var     a, b: string;        c: integer;begin      writeln('Введите первое слово: ');      readln(a);      writeln('Введите второе слово: ');      readln(b);      c := length(a) - length(b);      if c = 0 then writeln('Длины слов равны')      else if c > 0 then writeln('Первое слово длиннее второго на ', c)      else writeln('Второе слово длиннее первого на ', -c)end.2)var a: string;begin      writeln('Введите предложение: ');      readln(a);      case a[length(a)] of            '.': writeln('Предложение повествовательное');       '!': writeln('Предложение восклицательное');       '?': writeln('Предложение вопросительное');      end;end.3)var     a: string;        t: char;begin      writeln('Введите слово: ');      readln(a);      t := a[1];      a[1] := a[length(a)];      a[length(a)] := t;      writeln('Полученное слово: ', a)end.