BDE555555дима
04.10.2022 18:27

Может кто-нибудь нарисовать выпуклый шестиугольник с этими точками? a b c d e g i k l

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Happymilks
17.07.2021 09:18
Вот на С++:

#include <iostream>
#include <sstream>
#include <fstream>
#include <string>
#include <vector>
#include <deque>
#include <queue>
#include <stack>
#include <set>
#include <map>
#include <algorithm>
#include <functional>
#include <cstring>
#include <utility>
#include <bitset>
#include <cmath>
#include <cstdlib>
#include <ctime>
#include <cstdio>
#include <climits>typedef unsigned long long ulol;
typedef long double ld;
typedef long long lol;
typedef long int  li;#define mp          make_pair
#define F           first
#define S           second
#define sqr(a)      ( (a) * (a) )
#define pb          push_back
#define INF         999999999
#define ret(a)      cout << endl; system("pause"); return(a)
//#define ret(a)      return(a)using namespace std;int main()
{
    ld x;
    cin >> x;
    x = ( 8 / sqrt( x ) ) + sqrt(x);
    cout << x;
    ret(0);
}
0,0(0 оценок)
Ответ:
mrpixkaGogar
23.01.2021 19:12

a)

const n=5;

var a:array [1..n,1..n] of integer;

i,j,k,s:integer;

begin

writeln('Массив: ');

for i:=1 to n do

begin

for j:=1 to n do

begin

a[i,j]:=random(3)-2;

write(a[i,j]:4);

end;

writeln

end;

for j:=1 to n do

begin

k:=0;

for i:=1 to n do

if a[i,j]<0 then k:=k+1;

if k=n then

begin

s:=s+1;

if s=1 then write ('Номера столбцов, все элементы которых отрицательны: ');

write (j,' ')

end

end;

if s=0 then write ('Столбцов, все элементы которых отрицательны - нет');

end.

б)

const n=5;

var a:array [1..n,1..n] of integer;

i,j,kp,ko:integer;

begin

for i:=1 to n do

for j:=1 to n do read (a[i,j]);

writeln('Массив: ');

for i:=1 to n do

begin

for j:=1 to n do write(a[i,j]:4);

writeln

end;

for j:=1 to n do

begin

ko:=0;

kp:=0;

for i:=1 to n do

begin

if a[i,j]<0 then ko:=ko+1;

if a[i,j]>0 then kp:=kp+1

end;

if ko=n then writeln ('В ',j,' столбце все элементы отрицательные');

if kp=n then writeln ('В ',j,' столбце все элементы положительные')

end

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота