Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
4 / 4 / 2
Регистрация: 03.11.2011
Сообщений: 103
1

Типизированные файлы. Выбрать данные о проводниках и упорядочить их по убыванию удельных весов

29.12.2011, 19:52. Просмотров 950. Ответов 1
Метки нет (Все метки)

Дан файл F, содержащий сведения о веществах указывается название вещества, его удельный вес и проводимость(проводник, полупроводник,изолятор).
Выбрать данные о проводниках и упорядочить их по убыванию удельных весов.

Добавлено через 7 минут
Вот похожая, переделайте пожалуйста подмоё задание

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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
program kubi;
uses crt;
type 
kub=record
color:string[10];
material:string[10];
razmer:integer;
 
end;
var
base:file of kub;
a:kub;
FileName:string;
i,n:integer;
c:char;
Begin
writeln('Введите название базы Кубиков');
readln(FileName);
Assign(base,FileName);
Rewrite(base);
writeln('Введите кол-во кубиков вводимых в базу данных');
readln(n);
Writeln('Приступим к вводу даных о кубиках');
with a do
 
 
for i:=1 to n do 
begin
with a do
begin
 
 writeln('Введите цвет:');
 writeln('1=красный');
 writeln('2=Желтый');
 writeln('3=Зеленый');
 writeln('4=Синий');
 readln(c);
 case c of
 '1':color:='Красный';
 '2':color:='Желтый';
 '3':color:='Зеленый';
 '4':color:='Синий';
 end;
 writeln('Введите материал');
 writeln('1=Деревянный');
 writeln('2=Металлический');
 writeln('3=Картонный');
 
 readln(c);
 case c of
 '1':material:='Деревянный';
 '2':material:='Металлический';
 '3':material:='Картонный';
 
 end;
 
  write('Введите размер: ');
 readln(razmer);
 end;
 write(base,a);
 end;
 close(base);
 writeln('Конец ввода даных. Нажмите ENTER');
 readkey;
 end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.12.2011, 19:52
Ответы с готовыми решениями:

Выбрать данные о проводниках и упорядочить их по убыванию удельных весов
Дан файл f, содержащий сведения о веществах: указывается название вещества, его удельный вес и...

Выбрать данные о проводниках и упорядочить их по убыванию удельного веса
Создать файл f. содержащий сведения о веществах: название вещества, его удельный вес, проводимость...

Выбрать данные о проводниках с заданным удельным весом
Помогите пожалуйста Дан файл f, содержащий сведения о веществах: 1) название 2) удельный вес...

Дан файл f, содержащий сведения о веществах. Выбрать данные о проводниках с заданным удельным весом
Дан файл f, содержащий сведения о веществах: 1) название 2) удельный вес 3) проводимость...

1
--\.founder./--
564 / 564 / 392
Регистрация: 20.10.2011
Сообщений: 867
29.12.2011, 21:32 2
igor913, а куда потом конченый результат девать ? В другой типизированный файл записать или вывести на текстовое окно ? Или в обычный текстовый файл ?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.12.2011, 21:32

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Выбрать элементы большие среднего арифметического и упорядочить получившийся массив по убыванию
Как можно заменить строчки с 8 по 12? Дан массив x1, x2,..., x20. Выбрать элементы большие...

Типизированные файлы, данные типа Integer записываются иероглифами
Есть две кнопки: Button1 должен создавать типизированный файлы Button2 должен записывать в файл...

Выбрать элементы массива, большие среднего арифметического, и упорядочить получившийся массив по убыванию
Дан массив x1, x2,..., x20. Выбрать элементы большие среднего арифметического и упорядочить...

Выбрать элементы массива, большие среднего арифметического, и упорядочить получившийся массив по убыванию
Дан массив x1, x2,..., x20. Выбрать элементы большие среднего арифметического и упорядочить...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.