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

Составить программу ! составьте программу выводящего таблицу умножения любого введённого числа

👇
Ответ:
dasha010598
dasha010598
08.02.2023
Program tablisa_umnogenya;
 var i,x,a: integer; 
begin 
 read(x); 
a:=0;
for i:=1 to 10 do 
 begin   
a:=a+x;   
writeln(a); 
end; 
end.
эта программа на Паскаль, на оценку среднюю, тк считаю что на оценку повыше, недостаточно понятное оформление, если на оценку повыше, то заменить строку "writeln(a); " на "writeln(x,'*',i,'=',a);"
4,4(15 оценок)
Открыть все ответы
Ответ:
nastyaxa12oziu9w
nastyaxa12oziu9w
08.02.2023

Объяснение:

V - это знак "ИЛИ"

& - знак "И"

Действия тут выполняются как в математике:

Сначала умножение (знак &), потом сложение (знак V)

Ну или сначала в скобках действия выполняются.

Для этого есть специальная таблица:

0 v 0 = 0

0 v 1 = 1

1 v 0 = 1

1 v 1 = 1

0 & 0 = 0

0 & 1 = 0

1 & 0 = 0

1 & 1 = 1

2)

(((1 v 0) v 1) v 1)

1 v 0 = 1

1 v 1 = 1

1 v 1 = 1

ответ: 1

7)

((0 & 0) v 0) & (1 v 1)

0 & 0 = 0

0 v 0 = 0

1 v 1 = 1

0 & 1 = 0

ответ: 0

9)

((1 & A) v (B & 0)) v 1

Начнём со второй скобки:

B & 0 = 0 в любом случае. Остаётся:

((1 & A) v 0)) v 1

Если A = 1, то:

1 & 1 = 1

1 v 0 = 1

1 v 1 = 1

Если A = 0, то:

1 & 0 = 0

0 v 0 = 0

0 v 1 = 1

ответ: 1 в любом случае, даже можно было не решать, так как в конце стоит " v 1 " - это значит, что в любом случае ответ будет 1

4,6(66 оценок)
Ответ:
flagmarta
flagmarta
08.02.2023
Я так понял на паскале нужно написать?
Program find;uses crt;varA:array[1..40] of integer;n,i ,k:integer;BEGINRandomize ;//Это ,чтобы каждый раз новые числа генерировало//Заполняем массив рандомными числамиfor i:=1 to 40 do  A[i] := random(15);
Writeln('Введите искомый элемент');Readln(n);
k:=0;for i:=1 to 40 do Begin                   // Проверяем,совпадает ли очередной эл-нт массива с искомым                   //Если совпадает, то увеличиваем счетчик k                   if A[i] = n  then k := k+1;                  End;
Writeln ('В массиве ', k , ' раз(а) встречается заданный элемент' );END.
4,5(19 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ