11. Найдите ошибки в записи программы. Перепишите программу в исправленном виде. program exmpl; var C: char; begin write ('Введите длины трех сторон треугольника: ') read (A, B, C) P=A+B+C write (Периметр треугольника равен, Р).

Решение:

В предложенной программе на Паскале есть несколько ошибок:

1. Объявление переменных: переменные A, B, C, P не объявлены в разделе var.
2. Тип переменной C: переменная C объявлена как char (символьный тип), что некорректно для хранения длины стороны. Длина стороны должна быть числовым типом (например, real или integer).
3. Оператор присваивания: в Паскале для присваивания используется оператор :=, а не =.
4. Завершение строк: Каждая команда в Паскале должна заканчиваться точкой с запятой (;), за исключением последней команды перед end.
5. Синтаксис оператора write: Если в строке write требуется вывести текст и значение переменной, их нужно разделить запятой.
6. Незавершенность программы: отсутствует блок end. для завершения программы.

Исправленная программа:

program exmpl; var A, B, C, P: real; begin write('Введите длины трех сторон треугольника: '); read(A, B, C); P := A + B + C; write('Периметр треугольника равен: ', P); end.