Мише надо построить забор вокруг своего деревенского домика, но вот самому это делать ему лень. а поскольку миша увлекается робототехникой, то он спроектировал специального робота- возводителя заборов. миша хочет, чтобы забор представлял собой правильный многоугольник. но не все так просто, ведь его робот строит забор, двигаясь по единственному пути. робот может соединять стороны забора только под заданным углом a. миша сильно задумался – а сможет ли робот построить забор, который он хочет видеть вокруг своего домика? формально говоря, заключается в том, чтобы определить - существует ли правильный многоугольник с углами, равными a? пример ввод вывод 3 no 30 yes 60 yes 90 24 no yes yes
Ответы
Полная хрень. В чем смысл этого бреда, пусть сам берет и строит
#include <iostream>
#include <cstdlib>
#include <vector>
using namespace std;
int main()
{
vector<int> v;
cout <<"Укажите размер массива: ";
int s;
cin >>s;
srand(time(0));
for(int i=0; i!=s; ++i)
v.push_back(rand()%100);
int find;
cout <<"Введите число для поиска: ";
cin >>find;
bool founded = false;
for(auto it=v.begin(); it!=v.end(); ++it)
if(*it==find) founded=true;
if(founded)
cout <<"Это число есть в массиве!" <<endl;
else cout <<"Такого числа нет в мвссиве!" <<endl;
return 0;
}
#include <cstdlib>
#include <vector>
using namespace std;
int main()
{
vector<int> v;
cout <<"Укажите размер массива: ";
int s;
cin >>s;
srand(time(0));
for(int i=0; i!=s; ++i)
v.push_back(rand()%100);
int find;
cout <<"Введите число для поиска: ";
cin >>find;
bool founded = false;
for(auto it=v.begin(); it!=v.end(); ++it)
if(*it==find) founded=true;
if(founded)
cout <<"Это число есть в массиве!" <<endl;
else cout <<"Такого числа нет в мвссиве!" <<endl;
return 0;
}
1. Если имеется в виду язык Pascal, то получим следующее:
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
b:=a+a;
writeln (b);
end.
Program50.pas(5) : Неизвестное имя 'b'
2. Попробуем такой вариант на Python
a =int(input())
b = a+a
print(b)
При вводе а получим на выходе 10
Получается, что в Pacal требуется объявлять переменные в секции переменных, или в любом месте программы можно объявить переменную с служебного слова var для PascalABC.net. Первый код можно переписать так, и он будет работать:
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
var b:=a+a;
writeln (b);
end.
Рузультат при введенном значении 5 равен 10
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
b:=a+a;
writeln (b);
end.
Program50.pas(5) : Неизвестное имя 'b'
2. Попробуем такой вариант на Python
a =int(input())
b = a+a
print(b)
При вводе а получим на выходе 10
Получается, что в Pacal требуется объявлять переменные в секции переменных, или в любом месте программы можно объявить переменную с служебного слова var для PascalABC.net. Первый код можно переписать так, и он будет работать:
var: a;
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
begin
readln(a);
var b:=a+a;
writeln (b);
end.
Рузультат при введенном значении 5 равен 10
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Ну если не правильно то будет 67%
Автор: Алексеевна
Составить таблицу истинности для m= (a+¬b)*( ¬a +b)+ (¬a + ¬b + ¬c)
Автор: kirillboytsov403
Вкакой системе счисления справедливо равенство 2*2=10
Автор: Artyukhin545