Первый лёгкий ты просто делай это через раундом. Begin
Write(random);
Вот таким способом.
Ну из таблицы же ясно. в пятом действии мы из задуманного числа + некую сумму вычитаем задуманное число. т.е на этом этапе от нашего числа перестает что либо зависеть. это равнозначно тому что: загадайте число, отнимите от него задуманное число - у вас получилось 0. ну или загадайте число , прибавте 1, отнимите загаданное число. получилось 1.
Нажми на картинку или если сфоткать камеру
Program square;
var: y,x: real;
begin
writeln('Введите значение x');
readln(x);
y:=75*(x^2)+(sqrt(12)*(x^5));
writeln('Значение y',y);
end.
Степень можно задать также как x*x или
через exp. Решать вам.
Язык: Pascal ABC.Net
1)program kokoko;
uses
crt;
var
i,k:integer;
begin
for i:=1 to 100 do k:=k+i;
writeln(k);
<span>end.
2)</span>program kokoko;
uses
crt;
var
i,k:integer;
begin
k:=1;
for i:=1 to 10 do k:=k*i;
writeln(k);
<span>end.</span>