Организовать нетипизированный файл вещественных чисел из N компонент

@banderlog555 · Регистрация: 27.03.2014

Author24 — интернет-сервис помощи студентам

Организовать нетипизированный файл вещественных чисел из N компонент. Заменить все положительные компоненты файла их квадратными корнями, а все отрицательные компоненты их квадратами. Вывести содержимое файла до обработки и после обработки.

Kodzaev · 12.05.2014, 13:48

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
{$R-}
 
type
  arr = array [1..1] of real;
 
var
  f: file;
  i, n: integer;
  x: ^arr;
 
begin
  Assign(f, '1.dat');
  Rewrite(f, sizeof(arr));
  Randomize;
  Write('Введите количество элементов: '); ReadLn(n);
  GetMem(x, sizeof(real) * n);
  for i := 1 to n do
    x^[i] := 10 * Random - 5;
  BlockWrite(f, x, sizeof(x));
  Close(f);
  Reset(f, sizeof(real));
  BlockRead(f, x, sizeof(x));
  WriteLn('Исходный файл:');
  for i := 1 to n do
  begin
    Write(x^[i]:7:2);
    if x^[i] < 0 then
      x^[i] := Sqr(x^[i])
    else
    if x^[i] > 0 then
      x^[i] := Sqrt(x^[i])
  end;
  WriteLn;
  WriteLn('Полученный файл:');
  Close(f);
  Reset(f, sizeof(real));
  BlockWrite(f, x, sizeof(x));
  Close(f);
  Reset(f, sizeof(real));
  BlockRead(f, x, sizeof(x));
  for i := 1 to n do
    Write(x^[i]:7:2);
  FreeMem(x, sizeof(real) * n);
  ReadLn
end.

Новые блоги и статьи Все статьи Все блоги /
Исключения в Java: советы, примеры кода и многое другое Javaican 18.05.2025 Исключения — это объекты, созданные когда программа сталкивается с непредвиденной ситуацией: файл не найден, сетевое соединение разорвано, деление на ноль. . . Список можно продолжать до бесконечности. . . .	Как сделать SSO (Single Sign-On) в C# приложении stackOverflow 18.05.2025 SSO — это механизм, позволяющий пользователю пройти аутентификацию один раз и получить доступ к нескольким приложениям без повторного ввода учетных данных. Вы наверняка сталкивались с ним, когда. . .	Kubernetes с Apache Flink для обработки данных в реальном времени Mr. Docker 17.05.2025 Kubernetes — это целая философия управления распределёнными приложениями. В отличие от "примитивных" решений вроде Docker Swarm, K8s (как его ласково называют в тусовке DevOps-инженеров) предлагает. . .	Использование декораторов в Python py-thonny 17.05.2025 Если вы когда-нибудь задумывались о том, как красиво расширить функциональность кода без лишней возни и дублирования, декораторы в Python — та самая волшебная палочка, которую вы искали. По сути, это. . .	Реализация многопоточных сетевых серверов на Python py-thonny 16.05.2025 Когда сталкиваешься с необходимостью писать высоконагруженные сетевые сервисы, выбор технологии имеет критическое значение. Python, со своей элегантностью и высоким уровнем абстракции, может. . .
C# и IoT: разработка Edge приложений с .NET и Azure IoT UnmanagedCoder 16.05.2025 Мир меняется прямо на наших глазах, и интернет вещей (IoT) — один из главных катализаторов этих перемен. Если всего десять лет назад концепция "умных" устройств вызывала скептические улыбки, то. . .	Гибридные квантово-классические вычисления: Примеры оптимизации EggHead 16.05.2025 Гибридные квантово-классические вычисления — это настоящий прорыв в подходах к решению сложнейших вычислительных задач. Представьте себе союз двух разных миров: классические компьютеры, с их. . .	Использование вебсокетов в приложениях Java с Netty Javaican 16.05.2025 HTTP, краеугольный камень интернета, изначально был спроектирован для передачи гипертекста с минимальной интерактивностью. Его главный недостаток в контексте современных приложений — это. . .	Реализация операторов Kubernetes Mr. Docker 16.05.2025 Концепция операторов Kubernetes зародилась в недрах компании CoreOS (позже купленной Red Hat), когда команда инженеров искала способ автоматизировать управление распределёнными базами данных в. . .	Отражение в C# и динамическое управление типами stackOverflow 16.05.2025 Reflection API в . NET — это набор классов и интерфейсов в пространстве имён System. Reflection, который позволяет исследовать и манипулировать типами, методами, свойствами и другими элементами. . .

@banderlog555 0 / 0 / 0 Регистрация: 27.03.2014 Сообщений: 15

	Организовать нетипизированный файл вещественных чисел из N компонент 12.05.2014, 09:00. Показов 1424. Ответов 1 Метки нет (Все метки) Организовать нетипизированный файл вещественных чисел из N компонент. Заменить все положительные компоненты файла их квадратными корнями, а все отрицательные компоненты их квадратами. Вывести содержимое файла до обработки и после обработки. 0

Опции темы

Организовать нетипизированный файл вещественных чисел из N компонент

Решение