1.
#include <iostream>
using namespace std;
int main() {
int n=6; // n может быть 4, 6, 8 и т.д.
for (int i=1; i<n/2; i++){
for (int j=i; j<=n/2-1;j++) cout << " ";
for (int j=1; j<=2*i; j++) cout << "*";
for (int j=i; j<=n/2-1;j++) cout << " ";
cout << "\n";
}
for (int i=1; i<=n; i++) cout << "*";
cout << "\n";
for (int i=n/2-1; i>=1; i--){
for (int j=i; j<=n/2-1;j++) cout << " ";
for (int j=1; j<=2*i; j++) cout << "*";
for (int j=i; j<=n/2-1;j++) cout << " ";
cout << "\n";
}
return 0;
}
Результат:
<span> **
****
******
****
**
2.
</span><span>#include <iostream>
using namespace std;
int main() {
int n=6; // n может быть 3, 4, 5 и т.д.
for (int i=0; i<n; i++){
for (int j=1; j<=i; j++) cout << " ";
for (int j=i; j<n; j++) cout << "*";
cout << "\n";
}
return 0;
}
Результат:
******
*****
****
***
**
*</span>
1.
var a,b:integer;
begin
readln(a);
readln(b);
if ((a>0) and (b>0)) Or ((a<0) and (b<0))
writeln('У обоих чисел одинаковые знаки')
else
writeln('У чисел разные знаки') ;
<span>end.
2.
var a,b:integer;
begin
readln(a);
readln(b);
if (a mod 2=0) And (b mod 2=0) then
writeln('Высказывание истинно')
else
writeln('Высказывание ложно')
<span>end.</span></span>
Var
x,max:real;
n,i:integer;
begin
write('Введите число n: ');
readln(n);
for i:=1 to n do
begin
write('Введите число ',i,': ');
readln(x);
if x<0 then
begin
if max=0 then max:=x; // если это первое отр.число
if x>max then max:=x
end
end;
writeln('Наибольшее среди отрицательных: ',max)
<span>end.</span>