Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Юлия_nev
0 / 0 / 0
Регистрация: 24.11.2013
Сообщений: 24
1

Проверьте программу, реализующую заполнение анкеты о студенте, пожалуйста.

26.12.2013, 17:48. Просмотров 271. Ответов 0
Метки нет (Все метки)

Нужно написать программу реализующую заполнение анкеты о студенте(Ф.И.О.,дата рождения,адрес,курс и группа), а затем вывести на экран.

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
program anketa;
Uses
 CRT;
type v=record
 fio:string[25];
gr, adres, curs, dr:integer;
end;
var
 spisok:array[1..25] of v;
i,n:integer;
begin
 readln(n);
 writeln('ввeдите данные ',i,'-го студента: ');
  with spisok[i] do
   begin
    write('Ф.И.О.: ');
    readln(fio);
    write('дата рождения: ');
    readln(dr);
    write('адрес: ');
    readln(adres);
    write('курс: ');
    readln(curs);
    write('группа: ');
    readln(gr); 
  end;
WriteLn;
end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.12.2013, 17:48
Ответы с готовыми решениями:

Проверьте пожалуйста программу
Помогите найти ошибку В одномерном массиве, состоящем из n вещественных элементов, вычислить 1)...

Проверьте, пожалуйста, правильно ли я преобразовала программу
из while program n61; var x,y:real; begin writeln('x':10,'f(x)':10); x:=0; while x<=pi do...

Пожалуйста, проверьте программу. Что то не так с форматным выводом
program nakoplenie; var s,x,y,p,z: real; k1, k2, k3,k4,k: integer; function summa(k:...

Заполнение анкеты и поиск самого молодого и умного студента
Есть задача на PASCAL. Условие: Используя записи, написать программу, которая заполняет анкеты...

Разработать программу, которая вводит с клавиатуры данные о каждом студенте
Порядок выполнения работы 1. Составить список учебной группы, содержащей 15 студентов. 2. Указать...

0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.12.2013, 17:48

Используя записи, написать программу, которая заполняет анкеты студентов
Уважаемые форумчане ,осталось последняя задача ,её нужно сдать завтра ,прошу помогите ,вот задание:...

Используя записи, написать программу, которая заполняет анкеты студентов
Добрый вечер форум, есть задание, которое нужно будет сдать до завтрашнего утра, сам я по времени...

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


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

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

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