В стандартном Паскале нет функции десятичного логарифма, поэтому воспользуемся соотношением lg(x) = ln(x) / ln(10).
Кроме того, показатель степени у числа "е" (-x² / 2xy) можно упростить до -x / 2y.
var
a,x,y:real;
begin
Write('Введите x и у через пробел: '); Read(x,y);
a:=1e5*Ln(Abs(0.8*x))/Ln(10)*Exp(-x/(2*y));
Writeln('a=',a)
end.
Вариант а) отпадает, так как в 1 строке получим произведение 7 единиц=1, а должно получиться 0
Вариант б) отпадает, так как1 строке получим сумму 7 единиц=1, а должно получиться 0
В варианте В) прошла 1 строка, получили в итоге 0, но не прошла вторая строка. Получается 1, а должно быть равно 0
Остается вариант Г)
Если подставить значения, то все строки прошли тест.
Ответ: Г
const n = 10;
var a: array [1..n] of integer;
i: integer;
begin
for i:= 1 to n do readln(a[i]);
writeln('В прямом порядке: ');
for i:= 1 to n do write(a[i],' ');
writeln;
writeln('В обратном порядке: ');
for i:= n downto 1 do write(a[i], ' ');
end.
A := 10;
b := 6;
a := a + b; //a=16 , b=6
b := a mod 3; //a=16, b=1
<span>d := a - b; //d=16-1=<u>15</u></span>
1)#include <iostream>
using namespace std;
int main()
{
int x;//вводит пользователь
int y;//фунцыя
cout << "Please enter x > ";
cin >> x;
if (x <= -2 & x <= 2)//если -2<=x<=2
y = x * x;
else
y = 4;
cout << "From x : " << x << "; Y = " << y << endl;
system("pause");
return 0;
}
2)
#include <iostream>
using namespace std;
int main()
{
int x;//вводит пользователь
int y;//функцыя
cout << "Enter x > ";
cin >> x;
if (x < 2)
y = (1 + cos(2 * x)) / 2;//формула cos^2 X;
else
y = 1 + (1 - cos(2 * x)) / 2;//формула sin^2 X;
cout << "Your function from X : " << x << "; Y = " << y << endl;
system("pause");
return 0;
}
<em>Возможно запорол с формулами, перепроверь наверняка.</em>