Выделите текст, цвет которого требуется изменить.
На вкладке Главная в группе Шрифт щелкните стрелку рядом с элементом Цвет шрифта, а затем выберите цвет. Для быстрого форматирования текста можно использовать мини-панель инструментов с параметрами форматирования.
Ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.
var a,b,c,d,z:integer;
begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
while (z = 1) do
begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
end;
end.
Объяснение:
Выделите текст, цвет которого требуется изменить.
На вкладке Главная в группе Шрифт щелкните стрелку рядом с элементом Цвет шрифта, а затем выберите цвет. Для быстрого форматирования текста можно использовать мини-панель инструментов с параметрами форматирования.