Ответ::::: <span>C) на сайтах</span>
program abc;
var a,b,c,s: integer;
begin
s:=0;
writeln ('Введите двузначное число');
readln(a);
b:=a div 10;
c:= a mod 10;
s:= b + c;
writeln ('Сумма цифр вашего числа = ',s);
end.
Треугольников 40
и 10 квадратов
Var
x, y: real;
begin
write('Введите x: ');
readln(x);
if x <= -6 then y:=1-x
else if x <= -4 then y:=x/4
else y:=x;
writeln('y = ', y:4:2);
end.<span>
</span>
Объяснение:
Должен создать 4 переменные для каждого числа.
YES будет высвечиваться в том случае, если: a = d, b = c.
NO будет высвечиваться в остальных случаях.
(Пишу на других языках, но тут через конструкцию if esle делай)