Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
0 / 0 / 0
Регистрация: 18.10.2012
Сообщений: 148
1

Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по номеру

26.03.2013, 14:08. Показов 1499. Ответов 1
Метки нет (Все метки)

Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по номеру. Каждая запись должна содержать следующие сведения: номер измерения (тип integer); значение (тип real).

Добавлено через 14 часов 8 минут
Напишите ответ
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.03.2013, 14:08
Ответы с готовыми решениями:

Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по номеру
Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по номеру. Каждая запись...

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

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

Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по ФИО
Составьте программу, которая обеспечивает ввод данных, вывод данных, поиск по ФИО. Каждая...

1
218 / 50 / 52
Регистрация: 15.01.2013
Сообщений: 295
26.03.2013, 14:57 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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
uses crt;
const r=5;
var i,g:integer;
h:boolean;
n:array[1..r] of integer;
u:array[1..r] of real;
begin
clrscr;
for i:=1 to r do begin
    write('Nomer izmereniya ');
    read(n[i]);
    write('Znachenie ');
    readln(u[i]);
end;
for i:=1 to r do
    writeln('Nomer:',n[i],' Izmerenie:',u[i]);
write('Kakoi nomer nayti? ');
readln(g);
h:=False;
for i:=1 to r do
    if (g=n[i]) then begin
    writeln('Nomer:',n[i],' Izmerenie:',u[i]);
    h:=True;
    end;
if (h=False) then writeln('Vy vveli ne vernyi nomer!');
readkey;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.03.2013, 14:57

Составьте программу, которая создает файл, обеспечивает ввод данных, вывод данных, поиск по ФИО
Составьте программу, которая создает файл, обеспечивает ввод данных, вывод данных, поиск по ФИО....

Составьте программу, которая создает файл, обеспечивает ввод данных, вывод данных, поиск по ФИО
Помогите исправить в тексте программы ошибки. Задача: Составьте программу, которая создает файл, ...

Составьте программу, которая обеспечивает вывод данных, поиск по году рождения и личному номеру
Составьте программу, которая обеспечивает вывод данных, поиск по году рождения и личному номеру....

Составьте программу, которая обеспечивает вывод данных, поиск по году рождения и личному номеру
Помогите пожалуйста. Задали 3 задачи 2 сделал... А это немогу понять(( Составьте программу,...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru