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

Алгебра Логики. 1. Постройте таблицу истинности из всех возможных ситуаций для 1)AvB^A; 2)(AvB)^A.

3.Определите истинность высказывания: АΞBv(C^A), если А и Б истинны, а С ложно., 4.Определите истинность высказывания: СvА^B Ξ(CvA), если А и С ложно, а Б истинно.
Люди добрые ☹️

👇
Открыть все ответы
Ответ:

using System;

namespace ConsoleApp

{

   class Program

   {

       static void Main(string[] args)

       {

           Console.Write("Enter N = ");

           int n = int.Parse(Console.ReadLine());

           double Result = 1;

           int i;

           for (i = 0; i < n; i++) Result *= 1.0 + 1.0 / Math.Pow((double)i, (double)i);

           Console.WriteLine("For cycle result = " + Result.ToString());

           i = 0;

           Result = 1;

           while (i < n) {

               Result *= 1.0 + 1.0 / Math.Pow((double)i, (double)i);

               i++;

           }

           Console.WriteLine("While cycle result = " + Result.ToString());

           Console.ReadLine();

       }

   }

}

4,7(28 оценок)
Ответ:
Galinachlen
Galinachlen
11.04.2020
{Лови прогу для одномерного массива. Если он двумерный, могу модифицировать.
Должна работать, не работает - отпишись, отыщу паскаль и исправлю.
Кидай прям весь ответ, кэп. Комментарии подотри, опять же кэп}

program massiv;
var x:array[1..10] of real;
n, i:integer;
s:real;

begin
writeln('Vvedite razmer massiva');
readln(n);
if (n<1) or (n>10) then writeln('Neverno zadano znacheniye razmera massiva')
else begin {check: +}
for i:=1 to n do begin writeln('Vvedite element ', i, 'iz ', n); readln(x[i]); end; {enter the array}
s:=0;
for i:=1 to n do
begin
s:=s+power(x[i], 3);
end;
writeln(s:2:2);
end;
readln; {stop here to read the program answer}
end.
4,4(17 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ