А) integer так как 2 в последнем слагаемом сократится
б) однозначно real, так как X в переменных описан явно как real
в) real (все переменные описаны как real)
г) real (все из-за корня квадратного)
Var a, b, c : integer;
begin
readln(a, b, c);
if (a = b) and (a=c) then writeln('Треугольник равносторонний');
if ((a=b) and (a<>c)) or (b = c) and (b<>a) then writeln('Треуголник равнобедренный')
end.
A = 10 b = 3
если 10 > 3 то b = 3 + 12 = 15
если 10 > 15 то ,,, иначе
a= 10-7=3
ответ
a =3
b=15
4. Буфер обміну, зокрема, дуже корисна функція, адже набирати те саме речення по 3-4 рази втомлює та дратує водночас. З ним легко ввести одні й ті ж самі слова, наприклад, в таблиці, замість того, щоб набирати його вручну. Він корисний, коли потрібно розіслати оголошення в соц. мережі кільком друзям, аніж нервуватись над написанням кожного оголошення.
Вибачайте, але 5 я не зможу зробити, але хоча би з цим допомогла.