#include <iostream>
#include <cmath>
using namespace std;
int main()
{
setlocale(LC_ALL, "Russian");
double x,y,z;
cout << "Введите 3 числа через пробел: ";
cin >> x >> y >> z;
if (x<0)
{
x=pow(x,2);
}
else if (x>0)
{
x=pow(x,3);
}
if (y<0)
{
y=pow(y,2);
}
else if (y>0)
{
y=pow(y,3);
}
if (z<0)
{
z=pow(z,2);
}
else if (z>0)
{
z=pow(z,3);
}
cout << "Вывод: " << x << " " << y << " " << z << endl;
return 0;
}
Var
i,n,k:integer;
s:string;
begin
readln(s);
n:=length(s);
for i:=1 to n div 2 do
if s[i]=s[n-i+1]then
k:=k+1;
if k=n div 2 then
writeln('y')
else
writeln('n');
<span>end.</span>
Таблица истинности дает 5 единиц и 11 нулей.
См. приложения.
Var b, c: integer;
begin
Writeln('Введите ваш возраст');
Readln(b);
if b <= 0 then
WriteLn('Вам 0 лет')
else begin
c := b mod 100;
if (c >= 10) and (c <= 20) then WriteLn('Вам ', b, ' лет')
else
case (b mod 10) of
1: WriteLn('Вам ', b, ' год');
2..4: WriteLn('Вам ', b, ' года');
5..9, 0: WriteLn('Вам ', b, ' лет')
end;
end;
Writeln('Для выхода нажмите <Enter>');
Readln;
end<span>.</span>