1. Щелкаем по надписи правой кнопкой мыши
2. Выбираем пункт "Формат надписи..."
3. Вкладка "Цвета и линии"
4. Выбираем цвет линии "Нет цвета"
B2=(10-2)/2=4
Т.к. все части одинаковы, C2=4
Из этого, C1=2
Проверим: A2=2-(-2)=4
Var
a,b,c,d : integer;
<span>Begin </span>
for a:=1 to 4 do
for b:=a+1 to 4 do
for c:=b+1 to 4 do
<span> for d:=c+1 to 4 do </span>
writeln(a:3,b:3,c:3,d:3);
for a:=1 to 4 do
<span> for b:=a+1 to 4 do </span>
<span> for c:=b+1 to 4 do </span>
writeln(a:3,b:3,c:3);
for a:=1 to 4 do
<span> for b:=a+1 to 4 do </span>
writeln(a:3,b:3);
for a:=1 to 4 do
<span> writeln(a:3); </span>
readln;
<span> End.</span>
В начало строки
в конец строки
на слово вправо
на слово влево
на экранную страницу вверх
на экранную страницу вниз
на страницу вверх
на страницу вниз
в начало текста
в конец текста
Ответ:
program dvuznach;
var a,b,c,d,f:integer;
begin
writeln('Введите двузначное число');
readln(a);
b:=a div 10;
c:=a mod 10;
d:=b+c;
f:=b*c;
writeln('Сумма=',d);
writeln('Произведение=',f);
end.
Объяснение: