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

Напишите программу на паскале, очень нужно


Напишите программу на паскале, очень нужно

👇
Ответ:
Dan4ik7211
Dan4ik7211
21.06.2021

Объяснение:

program zadan;

const n=10;

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

   i:integer;

begin

 i:=1;

 while i<=10 do

 begin

   write('a[i]= ');readln(a[i]);

   i:=i+1;

 end;

end.

4,7(93 оценок)
Открыть все ответы
Ответ:
Foxmem
Foxmem
21.06.2021

program ExampleN;

uses Math;   // объявление математических функций для вашей версии паскаля

var

 a, b, d, s, y1, y2, x: Double;

begin

 Write ('Введете границы отрезка: ');

 ReadLn (a, b);

 s := 0;

 d := (b - a) / 10;             // длина 1/10 отрезка

 x := a + d / 2;                // начальное значение Х = левая граница + половина отрезка (середина основания)

 while x < b do begin           // цикл по всей длине отрезка

   y1 := Sqr (x);

   y2 := 5 + x / 2;

   s := s + Abs (y1 - y2) * d;  // расчет площади прямоугольника и суммирование

   x := x + d;                  // увеличение Х на 1/10 отрезка

 end;

 WriteLn ('Площадь = ', s :20 :10);

 ReadLn;

end.

4,5(32 оценок)
Ответ:
Tokalexandra
Tokalexandra
21.06.2021

Конъюнкция истинна, если верны все конъюнкты. Значит, все импликации должны быть истинны.

Импликация истинна во всех случаях, кроме 1 → 0, поэтому если xk = 1, то и все x с номерами, большими k, единицы. Если записывать решение в виде  строчки со значениями переменных от x1 до x5, получается 6 решений: 00000, 00001, 00011, 00111, 01111, 11111.

Аналогично, есть 6 решений для игреков: 11111, 11110, 11100, 11000, 10000, 00000.

x2 ∨ y2 = 1, значит, хотя бы одна из переменных x2, y2 истинна. Подсчитываем число комбинаций.

1) x2 истинна (решение 01111 или 11111). Подходят все 6 решений для игреков, по правилу произведения получаем 2 * 6 = 12 решений.

2) x2 ложна (4 решения). Подходят 4 решения для игреков (все, кроме 10000 и 00000). По правилу произведения 4 * 4 = 16 решений.

Всего 12 + 16 = 28 решений.

4,4(99 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ