Втекстовом процессоре ворд пэд наберите слово информатика и сохраните его в документе с именем д 1 указав - id23593820210318 от nastyaignatova3 18.03.2021 10:19

Question

Информатика: Втекстовом процессоре ворд пэд наберите слово информатика и сохраните его в документе с именем д 1 указав тип файла текстовый документ объясните почему файл имеет именно такой размер»

nastyaignatova3 · Accepted Answer

{ Задача по информатике решить в паскале Имеется продуктовая база в которой можно
закупить партию товара по условиям минимальная стоимость , близость поставки ,
прочность товара Если товар удолетворяет - закупаем
Если ее удолетворяет - не закупаем
Мы вводим данные близость поставки, прочность товара, и минимальная стоимость
если все три условия выполняются ввыводим закупаем а
если не выполняются выводи не закупается}
type
    WareData = record
        MinPrice: integer;
        Distance: integer;
        Strength: real;
    end;

var
    Base, Client: WareData;

begin
    Base.MinPrice := 4;
    Base.Distance := 57;
    Base.Strength := 0.25;

    read(Client.MinPrice, Client.Distance, Client.Strength);
    if (Client.MinPrice >= Base.MinPrice)
        and (Client.Distance >= Base.Distance)
        and (Client.Strength <= Base.Strength) then
        writeln('Берем')
    else
        writeln('Не устраивает');
end.

MOGZ ответил