составить программу в Паскале
10-11 класс
|
uses crt;
var x,y: real;
begin
write('Введите координаты: ');
read(x,y);
writeln;
if (abs(x)>1) or (abs(y)>1) then write('l=0')
else
if sqr(x)+sqr(y)>1 then write('l=1')
else
if abs(y)>1-abs(x) then write('l=2')
else write('l=3');
end.
Другие вопросы из категории
Вычеркните из слова Х буквы, стоящие на чётных местах.
букв (кроме буквы O). Для хранения каждой из цифр используется одинаковое и наименьшее возможное количество бит. Аналогично, для хранения каждой из букв используется одинаковое и наименьшее возможное количество бит. При этом количество бит, используемых для хранения одной буквы и одной цифры могут быть разными.
Для хранения каждого номера используется одинаковое и минимально возможное количество байт. Сколько байт памяти потребуется для хранения 500 автомобильных номеров? Номера хранятся без разделителей.
1)3000
2)2500
3)2000
4)1500
Что происходит с информацией в ОП, если выключить компьютер? *
она исчезает
она сохраняется во внешней памяти
она обрабатывается процессором
она остается неизменной
выражение, значением которого является:
а)
Читайте также
пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.
задание: дана матрица А(N, N). Составить программу подсчета количества положительных элементов, расположенных выше главной диагонали
2. Составить программу для упорядоченное двух элементов по убыванию.
программу меняющихся местами первую и последнюю цифру.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.