Lab2 (Лабораторные работы (В PAS-файлах))
Описание файла
Файл "Lab2" внутри архива находится в следующих папках: Лабы в PAS-файлах, Лабы. Документ из архива "Лабораторные работы (В PAS-файлах)", который расположен в категории "". Всё это находится в предмете "информационные технологии" из 2 семестр, которые можно найти в файловом архиве РТУ МИРЭА. Не смотря на прямую связь этого архива с РТУ МИРЭА, его также можно найти и в других разделах. Архив можно найти в разделе "лабораторные работы", в предмете "информационные технологии" в общих файлах.
Онлайн просмотр документа "Lab2"
Текст из документа "Lab2"
ФЕДЕРАЛЬНОЕ АГЕНТСТВО ПО ОБРАЗОВАНИЮ
МОСКОВСКИЙ ГОСУДАРСТВЕННЫЙ ИНСТИТУТ РАДИОТЕХНИКИ, ЭЛЕКТРОНИКИ И
АВТОМАТИКИ
(ТЕХНИЧЕСКИЙ УНИВЕРСИТЕТ)
Кафедра РПУ
Лабораторная работа №2
Тема: “Ветвящиеся процессы”
Вариант №18
Цель работы: получить навыки работы использования арифметических операций и стандартных математических функций на примере выполнения двух заданий.
работу выполнил
группа
проверил: Давлетин Д.И.
Москва 2008
Постановка задачи. Определить, попадает ли точка в заштрихованную область.
2. Спецификация
3. Алгоритм
1. Задание1
Рисовал от руки
Программа
program p3;
uses crt;
var x,y:single;
label M1,M2,M3;
begin
clrscr;
M1:write('Введите X=');read(x);
write('Введите Y=');read(y);
if y>-1 then if abs(x)<1 then goto M2;
if y<=0 then if y>=-2 then if abs(x)<=2 then
if (sqrt(x*x+y*y))<=2 then goto M3;
M2:writeln('Данная точка не принадлежит заданной области');goto M1;
M3:writeln('Точка x=',x:5:2,'y=',y:5:2,'принадлежит заданной области');
readkey
end.
5. Результаты