Ответ: Компилятор PascalABC.NET
1) var a,v: integer;
begin
writeln('a'); readln(a); v:=a*a;
writeln(v); end.
2) var a,b,c, v: real;
begin
writeln('a'); readln(a);writeln('b'); readln(b);writeln('c'); readln(c);
v:=(a+b+c)/3;
writeln(v); end.
3)var v,y: integer;
begin
writeln('y'); readln(y); v:=8*y;
writeln(v); end.
//PascalABC.NET
//Версия 3.4.2
begin
range(1,ReadInteger('n=')).Where(x->x.IsEven).Println;
end.
Алгоритм считается более рациональным, потому что он использует вычисление значения полинома по схеме Горнера, позволяющей минимизировать число умножений и отказаться от операции возведения в степень. Во многих языках программирования операция возведения в степень отсутствует и ее реализуют либо отдельным алгоритмом, либо через основное логарифмическое тождество
![\displaystyle a^b=e^{b\times \ln a}](https://tex.z-dn.net/?f=%5Cdisplaystyle+a%5Eb%3De%5E%7Bb%5Ctimes+%5Cln+a%7D)
1)Корм. Пища, предназначенная для животных.
2) Мозг. Центральный орган нервной системы.
3)Гром. Сильный шум после молнии.
4) Маяк. Большой фонарь, помогающий самолётам и кораблям в направлении.