В чем смысл ошибки? uses crt; var g:integer; x,y,z :real; Begin textbackground (0);...

Question

В чем смысл ошибки? uses crt; var g:integer; x,y,z :real; Begin textbackground (0); textcolor (15); clrscr; readln (x,y); readln (g); case g of 1: z:= (sin(x)*cos(x))/2; -1: z:=2*x+x*y+0.5; -2: z:=(2+sqr(cos)*x); : Нет перегруженной подпрограммы с такими типами параметров else writeln ('1'); end; Writeln (z); readln end.

Answer 1

Скорее всего ```var``` это ошибка или else writein по пробуй поменять на if writein

Comments

В смысле Var это ошибка? Как переменные без Var задать в прогу?

---

Else вообще ни на что не влияет.

---

Нет var когда я сайт помогал другу делать была ошибка VAR и мы ее поменяли на другое что-то