<u>PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var (x,y):=ReadReal2('Введите координаты точки:');
var r:=ReadReal('Введите радиус окружности:');
if (x*x+y*y<r*r) and (y<-x) then Writeln('Попадает')
else Writeln('Не попадает')
end.
<u>Примеры</u>
Введите координаты точки: -1.1 1.2
Введите радиус окружности: 2
Не попадает
Введите координаты точки: -1.1 0.8
Введите радиус окружности: 2
Попадает
11100110=2^7+2^6+2^5+2^2+2^1=128+64+32+4+2=230
значок ^ означает степень(т.е 2^7, это 2 в седьмой степени)
№1
#include <iostream>
using namespace std;
int main ()
{
<span> int a,b;</span><span>
cin >> a >> b;</span><span>
if (a<b)</span><span> cout << a << endl;
</span><span> else if (a==b)</span><span> cout << "a=b" << endl;
</span><span> else</span><span> cout << b << endl;
</span><span> system ("PAUSE");</span><span>
return 0;
</span>}
№2
#include <iostream>
using namespace std;
int main ()
{
<span> char ch1,ch2;</span><span>
int i1,i2;</span><span>
cin >> ch1 >> ch2;</span><span>
i1=ch1;
</span><span> i2=ch2;</span><span>
if (i1<=i2)</span><span> cout << ch1 << ' ' << ch2 << endl;</span><span>
else</span><span> cout << ch2 << ' ' << ch1 << endl;</span><span>
system ("PAUSE");</span><span>
return 0;
</span>}
№3
#include <iostream>
using namespace std;
int main ()
{
<span> float p,q;
</span><span> cout << "p=";</span><span>
cin >> p;</span><span>
cout << "q=";</span><span>
cin >> q;
</span><span> cout << p-2*q << endl;
</span><span> system ("PAUSE");</span><span>
return 0;
</span><span>}</span>