papanovar
?>

Составьте таблицы истинности для следующих функций: ā => в в & (а v в) в & (ā v в) (ā => в) v (с & в)

Информатика

Ответы

aivanova
Все решила вроде правильно
Составьте таблицы истинности для следующих функций: ā => в в & (а v в) в & (ā v в) (ā =&g
Fedorovich_Aleksandrovich685

program arrdiap;

var

 N, A, B, i: Integer;

 M: array of Integer;

begin

 Write ('Введите размерность массива: ');

 ReadLn (N);

 SetLength (M, N);

 Randomize;

 for i := Low (M) to High (M) do begin

   M [i] := Random (100);

   Write (M [i], ' ');

 end;

 WriteLn;

 Write ('Введите диапазон A, B: ');

 ReadLn (A, B);

 WriteLn;

 WriteLn ('Принадлежит диапазону ', A, ' - ', B, ':');

 for i := Low (M) to High (M) do begin

   if (M [i] >= A) and (M [i] <= B) then

     Write (M [i], ' ');

 end;

 ReadLn;

end.

vbnm100584

Значит просто расписать как это должно работать?

Объявляем переменную День, которая будет считывать количество дней.

Вводится H хлеба - общее количество и Z - количество, которое потребляется в день.

Переведем кг в г, чтобы легче было считать: H = H * 1000

Запускается цикл пока H > 0(пока хлеб вообще имеется)

один проход цикла - один день, значит в теле цикла H = H - Z

То есть мы вычитаем из общего кг хлеба суточное потребление.

И увеличиваем переменую День на 1.

После этого цикла выводим переменную День.

Приведу пример на языке с++. В случае ввода H = 1, Z = 50, выводится ответ 20 дней

#include <iostream>

#include <cstdlib>

using namespace std;

int main()

{

int day = 0, Z, N;

cin >> N >> Z;

N = N * 1000;

while(N > 0){

 N = N - Z;

 day++;

}

cout << day << endl;

system("pause");

return 0;

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Составьте таблицы истинности для следующих функций: ā => в в & (а v в) в & (ā v в) (ā => в) v (с & в)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

printlublino
kristinmk
MariyaKhanbalaeva585
lovel24
multikbo3049
shtankosoyuz1629
vahmistrova
aerendzhenova5
Magnolia200872
lmedintseva6
nataljatchetvertnova
bk4552018345
oyudina
Margarita
aleksey270593