Компьютеh - это компьютер. Наверно кто-то быстро писал и ошибся нечаянно.
Program aaa;
uses crt;
var a,b,c:integer;
x, y: real;
begin
writeln(' Vvedite a ');
readln(a);
writeln(' vvedite b ');
readln (b);
wriateln(' Vvedite c' );
readln (c);
x:=((2*a^2-b)/(3*c));
y:=(sqrt(x+c^2)+4*a*b);
writeln( 'x=', x, 'y=', y);
<span>end.
Вот программа, к сожалению, паскаля на компе у меня нет, поэтому, думаю, ты сам справишься с подготовкой программы к запуску и тестированию
</span>
const Знаки_препинания = ".,!?():;—…«»";
var Строка = prompt();
alert(Строка.replace(new RegExp("[" + Знаки_препинания.split("").join("\\") + "]", "g"), ""));
1. a)
2. a)
3. c)
4. a)
5. с)
6. с)
7. d)
8. 20
9.
1) После example4 не стоит ;
2) Вместо red нужно read в обоих случаях
3) Вместо c=e нужно c:=e
4) После c:=a не стоит ;
10. Не понял как делать, возможно так:
(-23+(-22)+(-21)+(-20)+(-19)+(-18)+(-17)+(-16)+(-15)+(-14)+(-13)+(-12)+(-11)+(-10)+(-9)+(-8)+(-7)+(-6)+(-5)+(-4)+(-3)+(-2)+(-1)+0+1+2+3+4+5+6+7+8+9+10+11+12+13+14+15+16+17+18+19+20+21+22+23+24+25+26+27+28+29+30+31+32+33+34) / 58 = 319 / 58 = 5,5
Последнее скорее всего не правильно) Извиняй)