Задание 1. Составить программу на языке программирования Pascal и блок-схему для решения следующей задачи:

Составить программу на языке программирования Pascal и блок-схему для решения следующей задачи:

Вычислить расстояние между двумя точками с данными координатами x1, y1 и x2, y2.

Объявим переменные действительного типа x1, y1 и x2, y2 – для хранения координат точек и переменную r – для записи результата нахождения расстояния между этими точками.

Расстояние между точками r вычисляется по формуле:

Ввод переменных будет осуществляться с клавиатуры.

Текст программы на языке Pascal Uses crt; //Обращение к модулю Сrt библиотеки Var x1,y1, x2,y2, r: Real; //Раздел описания переменных Begin // Начало раздела операторов Clrscr; // очистка экрана Write('x1='); ReadLn(x1); // ввод х1 Write('x2='); ReadLn(x2); // ввод х2 Write('y1='); ReadLn(y1); // ввод у1 Write('y2='); ReadLn(y2); // ввод у2 r:=sqrt(sqr(x2-x1)+sqr(y2-y1)); // вычисление расстояния между точками WriteLn('r=',r:5:3); // вывод результата readkey; // Процедура задержки результата на экране end. // Конец раздела операторов  
Разработаем алгоритм программы в виде блок-схемы.








Дата добавления: 2015-02-05; просмотров: 1447;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.003 сек.