кто шарит в Паскаль. Реализовать работу процедур:1. Составить функцию, возвращающую значение True, если кол-во положит. чисел в текстовом файле больше кол-ва отрицательных, и значение False, если - наоборот. (Файл содержит числа типа real)2. Составить процедуру для ввода из текстового файла матрицы A (m на n) m, n<=5. Матрица в текстовом файле сформирована в виде матрицы

Формула Бине:

При работе с типом double имеет место быть некоторая погрешность. При больших числах относительная погрешность стремится к 0.

Код:

#include <iostream>#include <cmath>#define sqrt5 sqrt(5)#define   (1 + sqrt5)/2#define n (1 - sqrt5)/2long long fibBinet(int n) {    return (long long) round((pow(, n) - pow(n, n)) / sqrt5);}int main() {    long long binet77 = fibBinet(77);    std::cout << "fibBinet(77) = " << binet77 << " (5527939700884757)" << std::endl;    std::cout << "A = " << abs(5527939700884757ll - binet77) << std::endl;    std::cout << "B = " << 5527939700884757ll / binet77 << std::endl;    return 0;}

№1

1) Устройство вывода

2) Процессор

№2

1) Клавиатуры

2) Принтере

№3

Устройства ввода: клавиатура

Устройства вывода: монитор, наушники, принтер

№4

1) Веб-камера

2) Проектор

Объяснение:

№5

Операционная система изображена на первой картинке (Windows 7)

№6

1) Управление устройствами компьютера (ресурсами)

2) Ведение файловой структуры.

3) Пользовательский интерфейс, т.е. диалог с пользователем.

№7

Не могу разобрать сообщение (низкое качество фотографии)

№8

Wi-Fi

Bluetooth

USB

№9

Мобильность (удобство в использовании)

Легкость создания и расширения сети

№10

ИК-порт: телефон - компьютер

Bluetooth: беспроводные наушники\колонка - телефон