В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История

сделать информатику Постройте таблицу истинности логической функции F=not ((A or B) ->not(B or C))

Показать ответ
Ответ:
03721
03721
09.05.2023 04:24

Не понятно зачем ты присваиваешь переменной d тип double, а потом конвертируешь в int. Также не понятно зачем изначально присваивать переменным значения типа 0.0, так делают только тогда, когда к этой переменную будет суммироваться какое то значение. В этой задаче нужно просто присвоить, поэтому описания типа переменной будет достаточно.

Код:

using System;

class maxum000

{

 static void Main()

 {

   double d, m, cm, mm;

   Console.Write("Введите число дюймов: ");

   d = double.Parse(Console.ReadLine());

   cm = d * 2.54;

   mm = d * 25.4;

   m = d * 0.0254;

   Console.WriteLine("{0} дюйм(а/ов) = {1}м, {2}см, {3}мм", d.ToString(), m.ToString(), cm.ToString(), mm);

 }

}


Задача на C# 1)Длина отрезка задана в дюймах (1 дюйм = 2,54 см). Перевести значение длины в метричес
0,0(0 оценок)
Ответ:
sabinanuray1810
sabinanuray1810
16.03.2020 18:16

Створіть проект, у якому вводяться значення елементів табличної величини із 7 цілих чисел у багаторядковому текстовому полі, обчислюється сума від’ємних з них і результат виводиться в напис. Збережіть проект у папці з іменем Завдання 6.2.1, створеній у вашій папці.

procedure TForm1.Button1Click (Sender: TObject);

var a: array [1..8] of integer;

i, s: integer;

begin

for i: = 1 to 7 do a[i]:= StrToInt(Memo1.Lines[i - 1]);

s:= 0;

for i:= 1 to 7 do if a[i] < 0 then s:= s + a[i];

Label1. Caption: = IntToStr(s);

end;

2. Створіть проект, у якому вводяться значення елементів табличної величини з 8 дійсних чисел у багаторядковому текстовому полі, визначається кількість з них, які більші за 5, і результат виводиться в напис. Збережіть проект у папці з іменем Завдання 6.2.2, створеній у вашій папці.

procedure TForm1.Button1Click (Sender: TObject);

var a: array [1..8] of real;

i, k: integer;

begin

for i:= 1 to 8 do a[i]:= StrToFloat(Memo1.Lines[i - 1]);

k:= 0;

for i:= 1 to 8 do

if a[i] > 5 then k:= k + 1;

Label 1.Caption:= IntToStr(k);

end;

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота