М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ksyusa41
ksyusa41
05.03.2023 08:56 •  Информатика

Як у мові програмування Free Pascal позначають оператор присвоювання?

👇
Открыть все ответы
Ответ:
chizhikovilya
chizhikovilya
05.03.2023

1)

var n,k: integer;

begin

readln(n);

if (n>0) and (n<10) then k:=1

else if (n>9) and (n<100) then k:=2

else k:=3;

write(k);

end.

2)

var a,b,c: integer;

D,x1,x2: real;

begin

readln(a,b,c);

D:=b*b-4*a*c;

if(D>0) then begin

x1:=((-1)*b+sqrt(D))/(2*a);

x2:=((-1)*b-sqrt(D))/(2*a);

write(x1,' ',x2);

end else if (D=0) then begin

x1:=(-1)*b/(2*a);

write(x1);

end else write('Нет решений');

end.

3)

var x,y: integer;

begin

readln(x,y);

if(x=0) or (y=0) then write('точка лежит на координатной оси')

else begin

if(x>0) then begin

if(y>0) then write('I')

else write('IV');

end else

if(y>0) then write('II')

else write('III');

end;

end.

4,8(12 оценок)
Ответ:
roapoaop
roapoaop
05.03.2023

1. компьютерная сеть, покрывающая обычно относительно небольшую территорию или небольшую группу зданий (дом, офис, фирму, институт).

2. ПК, Веб-камера , Концентратор, Коммуникатор, Локальный принтер, Сетевой принтер, Сканер , Сервер.

3. В условиях реальных объектов самый правильный подход – сочетать разные среды передачи в зависимости от зон применения, расстояний и требований приложений к пропускной Выбор производится так, чтобы максимально использовать преимущества соответствующих сред и минимизировать влияние их недостатков для каждого конкретного объекта.

Объяснение:

4,7(86 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ