Покажите государственную границу Российской Федерации, назовите пограничные государства.

Покажите государственную границу Российской Федерации, назовите пограничные государства.
- Предмет:
  География
- Автор:
  moocher
- 6 лет назад

Ответы 1

18 пограничных государств: Норвегия, финляндия, эстония, латвия, литва, Польша, беларусь, украина, Грузия, Азербайджан, Казахстан, Китай, Монголия, Северная Корея + две морские границы - США и Япония + два непризнанных государства - Абхазия и Южная Осетия
- Автор:
  natashapotter
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

Основные элементы лимфатической системы и их функции .
Биология 8 класс.
За ответ 10 баллов .
- Предмет:
  Биология
- Автор:
  stanleywiley
- 6 лет назад
- Ответов:
  
  2
- Смотреть
Площадь прямоугольника равна 12. Найдите площадь ромба, вершинами которого являются середины сторон данного прямоугольника. Помогите пожалуйста!!
- Предмет:
  Геометрия
- Автор:
  lorenavaldez
- 6 лет назад
- Ответов:
  
  1
- Смотреть
сочинение на тему "Кем я хочу стать в будущем и как" я хочу стать врачом...на 8 класс..плииз
- Предмет:
  Русский язык
- Автор:
  hugohpuk
- 6 лет назад
- Ответов:
  
  2
- Смотреть
Даю 25 баллов! Помогите, пожаалуйста!!! В чем ошибка?
const
EPS = 0.01;
A = -100;
B = 100;
N=10;
var
Kol:integer;

ch_tek:array[1..N] of Real;
i : Byte;
Fl:boolean;
begin

Fl:=False;

For i:=1 to N do
begin
Repeat
Readln(Ch_tek[i]);
While (kol<10) do
If(Ch_tek[i]>=A) and(Ch_tek[i]<=B) then kol:=kol+1;

While (kol>1)do

If (Ch_tek[i-1]-Ch_tek[i]) writeln(Ch_tek[i-1],' ',Ch_tek[i]);
Fl:=True;
end;
if (FL=False) then writeln ('НЕТ');
end;

Задача:
Даны 10 чисел значения которых находятся в интервале от А до Б найти пару соседних чисел (заданных друг за другом) у которых значения отличаются на число меньшее чем EPS=0,01. Числа задаются последовательно. Если пары нет, то вывести слово «НЕТ».

1.Задать начальные данные: Kol:=0; Fl:boollean, Fl:=False. EPS:0.01
2.Задать границы А и B.
3.Организовать цикл с предусловием:
While (kol<10)and(Fl=False) do

5. В цикле: 1) считываем текущее число Ch_tek;

2)Проверить является ли число, принадлежащим интервалу. Если – да, то увеличить счет подходящих чисел: If (Ch_tek>=A) and(Ch_tek<=B) then kol:=kol+1.

3) Если число не является первым (kol>1), то проверить разность с предыдущим и если она меньше Эпсилон (заданного числа), то вывести текущее и предыдущее, променять флаг на TRUE (истина); ИНАЧЕ: Pred_ch:=Ch_tek;

6. После выхода из цикла проверить: если количество FL=False, то пара не найдена и нужно вывести «НЕТ».
- Предмет:
  Информатика
- Автор:
  joycer9q7
- 6 лет назад
- Ответов:
  
  0
- Смотреть

Покажите государственную границу Российской Федерации, назовите пограничные государства.

Ответы 1

Топ пользователей