3 / 3 / 0
Регистрация: 18.05.2012
Сообщений: 150

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

25.02.2013, 14:56. Показов 2272. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Организовать файл вещественных чисел из N компонентов.Заменить все позитивные компоненты файла их квадратными корнями,а все негативные компоненты их квадратами.Вывести содержимое файла до и после обработки.
Спасибо.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
25.02.2013, 14:56
Ответы с готовыми решениями:

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

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

Организовать файл целых чисел из N компонентов.
Организовать файл целых чисел из N компонентов. Найти сумму максимального и минимального элементов этого файла. Помогите плиз.

1
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
25.02.2013, 15:26
Лучший ответ Сообщение было отмечено tane как решение

Решение

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
uses crt;
var f:file of real;
    n,i:integer;
    a,b:real;
begin
clrscr;
randomize;
assign(f,'fileF');
rewrite(f);
write('Сколько  чисел записать в файл n=');
readln(n);
for i:=1 to n do
 begin
  a:=-10+20*random;
  write(f,a);
 end;
writeln('Содержание исходного файла:');
seek(f,0);
for i:=0 to filesize(f)-1 do
 begin
  seek(f,i);
  read(f,a);
  write(a:0:2,' ');
  if a>0 then b:=sqrt(a)
  else b:=a*a;
  seek(f,i);
  write(f,b);
 end;
writeln;
writeln;
seek(f,0);
writeln('Содержание полученного файла:');
for i:=0 to filesize(f)-1 do
 begin
  read(f,a);
  write(a:0:2,' ');
 end;
close(f);
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
25.02.2013, 15:26
Помогаю со студенческими работами здесь

Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных экстремумов исходного файла в порядке убывания
File22. Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных экстремумов исходного файла в порядке...

В файле из вещественных чисел заменить значение k-го компонента средним значением суммы положительных компонентов файла.
помогите пожалуйста.......!!!!! В файле из вещественных чисел заменить значение k-го компонента средним значением суммы положительных...

Организовать вещественные файлы А и В с одинаковым количеством компонентов. Получить файл С, компоненты которого определяются по правилу
Помогите пожалуйста! Организовать вещественные файлы А и В с одинаковым количеством компонентов. Получить файл С, компоненты которого...

Создать типизированный файл из вещественных чисел, записать во второй файл числа первого файла
Помогите пожалуйста написать программу Задача: создать типизированный файл из вещественных чисел, записать во второй файл числа...

Дописать файл из вещественных чисел суммой первых двух чисел из этого же файла
: Дописать файл из вещественных чисел суммой первых двух чисел из этого же файла. Вывести содержимое начального и получившегося файла.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
JWT аутентификация в ASP.NET Core
UnmanagedCoder 18.06.2025
Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .
Краткий курс по С#
aaLeXAA 18.06.2025
Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .
50 самых полезных примеров кода Python для частых задач
py-thonny 17.06.2025
Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД
stackOverflow 17.06.2025
Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .
Angular: Вопросы и ответы на собеседовании
Reangularity 15.06.2025
Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .
Архитектура Onion в ASP.NET Core MVC
stackOverflow 15.06.2025
Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .
Unity 4D
GameUnited 13.06.2025
Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .
SSE (Server-Sent Events) в ASP.NET Core и .NET 10
UnmanagedCoder 13.06.2025
Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .
С днём независимости России!
Hrethgir 13.06.2025
Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг.
kumehtar 13.06.2025
Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru