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

Решение в среде паскаль: написать программу для вычисления кол-ва детей в классе,если изветсно девочек 15,а мальчикво на в человек больше.

👇
Ответ:
Filippoa1203
Filippoa1203
13.07.2021

program klass;

uses crt;

var b, S, a: integer;

begin

writeln('введите число, на сколько мальчиков больше чем девочек: B = ');

readln(b);

a:=15+b;

S:=15+a;

writeln('В классе учится ',S,' человек');

readln;

end.

4,5(61 оценок)
Ответ:

Program kids;

var m,j,Summa:integer;

begin

  writeln('На сколько мальчиков больше ?'); readln(m);

  j:=15;

  Summa:=j+(m+j);

  writeln('В нашем классе ',Summa,' человек.');

 readln;

end.

 

j - это сумма девочек, а m+j - это сумма мальчиков.

 

4,6(59 оценок)
Открыть все ответы
Ответ:
rotaru1930
rotaru1930
13.07.2021

У нас есть логическое выражение \overline{A \wedge \overline{B} \vee \overline{A} \wedge B}.

Электронная схема состоит из логических вентилей -- базовых блоков, выполняющих элементарную логическую операцию (коньюнкция, инверсия, дизъюнкция итд), входных и выходных сигналов.

По ГОСТу вентили изображаются как прямоугольники с надписью, обозначающую операцию вентиля.

& -- коньюнкция,

1 -- дизьюнкция,

а кружок на сигнале, обозначает его инверсию.

Назовём выходной сигнал F (так как его надо как-то назвать). Смотрите рисунок. Немного кривой, т.к. рисовал в простом графическом редакторе, а не в специализированном ПО.

Таблица истинности -- таблица, задающая значение логической формулы для всех комбинаций переменных.

Напишем её:

\begin{array}{ccc}A & B & \overline{A \wedge \overline{B} \vee \overline{A} \wedge B} \\0 & 0 & 1 \\0 & 1 & 0 \\1 & 0 & 0 \\ 1 & 1 & 1\end{array}


Исходя из логического выражения построить электронную схему и найти выходные данные с таблицы истинн
4,6(35 оценок)
Ответ:
maksimiksanov
maksimiksanov
13.07.2021
1)uses crt; var  x,a,b,c,i: integer;     begin cls;   write('введите число: '); readln(x);     a: = x div 100;     b: = (x - a*100) div 10;     c: = (x - a*100 - b*10);     if (a=b) or (a=c) or (b=c) then    writeln('есть одинаковые цифры')    else    writeln('одинаковых цифр нет'); end.2)uses crt; var  x: real;     begin cls;   write('сумма покупки: '); readln(x);     if x> 1000 then x: =x-(x*0.1);     writeln('стоимость с учётом возможной скидки ',x); end.
4,4(88 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ