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

Можете объяснить за что отвечает program c4; var n: integer; x, y: integer; xmin, xmax: integer; xsearch: boolean; ymin, ymax: integer; i: integer; s: real; begin xsearch : = true; xmin : = 0; xmax : = 0; ymin: =0; ymax : = 0; readln(n); for i: =1 to n do begin readln(x,y); if y=0 then begin if xsearch or (xif xsearch or (x> xmax) then xmax: =x; xsearch: =false; end else if yelse if y> ymax then ymax: =y end; if (xmax> xmin) and (ymin< 0) and (ymax> 0) then s : = (xmax-xmin)*(ymax-ymin)/2 else s : = 0; writeln(s); end.

👇
Ответ:
Nady0208
Nady0208
21.09.2021
Толком не понятно что делает программа учитывая то, что скорее всего она работает не верно
Исправлены искажения текста перетягиванием или еще как-то, изза чего была написала белиберда
xsearch походу указывает на то, надо ли присваивать начальное значение xmax или оно уже присвоенно

var
    n: integer;
    x, y: integer;
    xmin, xmax: integer;
    xsearch: boolean;
    ymin, ymax: integer;
    i: integer;
    s: real;

begin
    xsearch := true;
    xmin := 0;
    xmax := 0;
    ymin := 0;
    ymax := 0;
    
    readln(n);
    
    for i := 1 to n do
    begin
        readln(x, y);
        if y = 0 then begin
            if xsearch or (x > xmax) then
                xmax := x;
            xsearch := false;
        end
        else if y > ymax then ymax := y
    end;
    
    if (xmax > xmin) and (ymin < 0) and (ymax > 0) then
        s := (xmax - xmin) * (ymax - ymin) / 2
    else
        s := 0;
    
    writeln(s);
end.
4,5(58 оценок)
Открыть все ответы
Ответ:
Kykyshka2000
Kykyshka2000
21.09.2021
1. Базовым понятием объектно-ориентированного программирования является:
4) объект 
2. Объектно-ориентированное программирование - это: 
2) метод программирования, суть которого состоит в разработке программы в виде взаимодействующих объектов 
3. Методы - это ... 
2) действия, которые можно выполнить над объектом или которые сам объект может выполнить 4. Укажите типы числовых переменных, принимающих только целые значения: 
2) Long; 
5. Укажите тип переменной которой соответствует логическое значение True или False: 
3) Boolean 6. Что изменяет операция присваивания? 
1) значение переменной 
7. Среди приведенных записей укажите те, которые могут быть именами переменных: 
1) sngSum 
2) Dim 
3) intX124  
7) B4 
8. Каково будет значение переменной после выполнения операций присваивания: 
intX = 5 
intX = intX + intX
4) 10 

10. Объявите переменную А и присвойте значение 155:

На c++{int a;a = 155;}
4,8(25 оценок)
Ответ:
TheGreatHaterMisha
TheGreatHaterMisha
21.09.2021
Uses graphABC;beginsetpenwidth(3);setwindowsize(600,700);ellipse(120,350,280,480);circle(200,300,60);circle(200,210,40);line(170,90,230,90);line(160,180,240,180);line(170,90,160,180);line(230,90,240,180);floodfill(200,173,clblack);floodfill(200,123,clblack); setbrushcolor(clblack);circle(190,200,5);circle(210,200,5);line(200,210,220,220);line(200,220,220,220);line(200,210,200,220);floodfill(204,214,clblack);setpenwidth(5);arc(200,230,10,180,0);line(70,320,170,250);line(230,250,330,300);line(300,450,350,200);
line(350,200,320,140);line(350,200,340,140);line(350,200,360,140);line(350,200,380,140);line(350,200,400,140);end.
4,7(52 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ