<span>#include <iostream>
using namespace std;
int main()
{
int n, a, b, c;
cout << "n = ", cin >> n, cout << <span>"\n"</span>;
cout << "a, b, c: ", cin >> a >> b >> c, cout << <span>"\n"</span>;
if (n / 100 == a) cout << <span>"Первая цифра совпадает\n"</span>;
else cout << <span>"Первая цифра не совпадает\n"</span>;
if (n / 10 % 10 == b) cout << <span>"Вторая цифра совпадает\n"</span>;
else cout << <span>"Вторая цифра не совпадает\n"</span>;
if (n % 10 == c) cout << <span>"Третья цифра совпадает\n"</span>;
else cout << <span>"Третья цифра не совпадает\n"</span>;
return 0;
<span>}
Пример:
</span><span>n = 385
a, b, c: 5 8 1
Первая цифра не совпадает
Вторая цифра совпадает
Третья цифра не совпадает</span></span>
Вот полный список примитивов: circle, ellipse, line, polygon, polyline, rect. Соответственно, нужно выбрать так:
- arc
- ✓ circle
- helix
- ✓ polyline
- ✓ ellipse
- ✓ rect
- hyperbola
Program Wybor;
uses Crt;
var y, a, b :real;
begin
a:=226.3;
b:=931.3;
if (a-b)<(10*ln(1/3.1415926) ) then y:= b*sqr(x)*x -a*ln(abs(2*x))+sqr(sin(x))
else y:=sqrt(b*sin(x)/cos(x))-exp(3*x);
WriteLn('y=', y:6:3);
ReadLn;
end.
Типа того, только проверь все внимательно, а то ТУРБО устроил мне пляску Святого Витта... Кстати, в Паскале нет тангенса, его заменяем sin(x)/cos(x) и я в программе "СЪЭКОНОМИЛ" описание переменной Х...
Const N1 = 5;
N2 = 5;
var a: array [0..N1, 0..N2] of integer;
b: array [0..N1*N2] of integer;
i, j, n: integer;
begin
for i:=0 to N1 do {Заполнение массивы случайными числами}
for j := 0 to N2 do
a[i, j] := random(9999);
for i:=0 to N1 do {Основная часть, проверка и заполнение второго массива}
for j := 0 to N2 do
if (a[i, j] mod 2 = 0) then
begin
b[n] := a[i, j];
n := n + 1;
end;
for i:=0 to n do {Вывод полученных чисел}
writeln(b[i]);
<span>end.</span>