Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

написать в программе паскаль

5-9 класс

Kvnuclear 06 мая 2014 г., 10:22:45 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
H1pster
06 мая 2014 г., 13:13:38 (10 лет назад)

var x,y,dist:real;

begin

   readln(x,y);

   dist:=sqrt(x*x+y*y);

   readln(x,y);

   x:=sqrt(x*x+y*y);

   if (x>dist) then writeln('2-я точка ближе')

      else if (x<dist) then writeln('1-я точка ближе')

         else writeln('Одинаково')

end.

Ответить

Другие вопросы из категории

Сколько различных сочетаний нулей и единиц для кодовой таблицы

символов можно получить с помощью одного байта (8 бит)?

сформулируйте массив,содержащий 15 элементов,с помощью датчика случайных чисел. получите новый массив,каждый элемент которого равен обратному

соответствующему элементу исходного массива. посчитайте кол- во неизменившихся эелементов и найдите в новом массиве максимальный о абсолютной величине отрицательный элемент. выведите на экран исходные и полученные результаты (ПОМОГИТЕ ПОЖЛСТ ОЧЕНЬ НАДО)

Срочно!!!! помогите!!!!
Пословицы, поговорки, крылатые выражения являются своеобразными моделями, которые мы используем в речи для придания ей образности и

эмоциональности. Прочитайте истории возникновения поговорок и опишите современные ситуации, моделями которых они служат.

Читайте также

Написать в программе Паскаль программу:

Вывести сначала положительные числа из отрезка [a;b], а потом отрицательные числа из отрезка [a;b] и количество положительных и отрицательных чисел из отрезка [a;b]

написать в программе паскаль
написать в программе паскаль:

вычислить и напечатать результат выражения z при c=15, d =5

z=5(c+2dв кубе)дробь c+d



Вы находитесь на странице вопроса "написать в программе паскаль", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.