Программа на языке программирования Pascal:
var
x, y: real;
begin
read(x, y);
if (y > sqr(x)-2) and ((y < x) or (y < -x)) then
writeln('YES')
else
writeln('NO')
end.
<span>+ Интернета
Большое количесво информации, возможность быстрого и не дорогого общения, а так же обновления программного обеспечения, один из способов быстро заработать деньги, разлчные игры, много доступной для скачивания музыки и фильмов
- Интернета
быстрое привыкание, большая зависимость - в следвии чего нарушается здоровье человека - (нервная система, зрение, и т.д.), недостаток реального (эмоционального) общения, низкая скорость, нестабильная работа....</span>
256=2^8
16=2^4
Объём файла=кол-во символов*кол-во бит на 1 символ
то есть объём увеличится в 2 раза)
Var
a:array[1..12]of integer;
m, n:integer;
Begin
a[1]:=31;a[7]:=31;
a[2]:=28;a[8]:=31;
a[3]:=31;a[9]:=30;
a[4]:=30;a[10]:=31;
a[5]:=31;a[11]:=30;
a[6]:=30;a[12]:=31;
Write('Введите номер месяца -> ');
Readln(m);
Write('Год високосный(1 - да || 0 - нет)?');
Readln(n);
if (m = 2) then Writeln(a[m] + n) else
Writeln(a[m]);
end.
Ответ:
Исходник ниже. В задаче говорится, что чисел ровно 12, поэтому сделал статический массив на константное количество элементов. Если предполагается, что программа должна работать и на других размерах массива, то можно сделать динамический массив или использовать контейнер vector.
Объяснение:
#include <iostream>
int main(){
const int n = 12;
int a[n];
for(int i = 0; i < n; i++){
std::cin >> a[i];
}
bool ascending= true;
for(int i = 1; i < n; i++){
if (a[i-1] > a[i]){
ascending = false;
break;
}
}
if (ascending){
std::cout << "Yes" << std::endl;
}
else{
std::cout << "No" << std::endl;
}
return 0;
}