1) составить алгоритм и программу вычисления периметра равностороннего треугольника, если задано его значение стороны а (р=3*а). 2) записать формат присваивания и значение его аргументов

1)
Программа на паскале:
var a,p:integer;
begin
write('a='); readln(a);
p:=3*a;
writeln('Периметр = ',p);
end.

Пример:
a=5
Периметр = 15

2)
Формат команды присваивания на паскале:
<переменная> := <выражение>