Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
Юлия_nev
0 / 0 / 0
Регистрация: 24.11.2013
Сообщений: 24
#1

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

26.12.2013, 17:48. Просмотров 257. Ответов 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
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Проверьте программу, реализующую заполнение анкеты о студенте, пожалуйста. (Pascal ABC):

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

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

Заполнение анкеты и поиск самого молодого и умного студента - Pascal ABC
Есть задача на PASCAL. Условие: Используя записи, написать программу, которая заполняет анкеты студентов. Анкета включает в себя ФИО,...

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

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

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

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

Проверьте пожалуйста! - Pascal
Пожалуйста проверьте задачу все лия правильно делаю Нужно написать программу ,которая выводит таблицу значений y=!x+2!,диапазон от -4...

Проверьте пожалуйста - Pascal
вот условие Описать процедуру PowerA3(A, B), вычисляющую третью степень числа A и возвращающую ее в переменной B (A — входной, B — выходной...

Проверьте пожалуйста. (Внутри) - Pascal ABC
(Ссылка на сторонний ресурс удалена) Раздел Циклы. Цикл While. Обработка последовательностей, индуктивные функции. Задача С. Вот код...

Проверьте пожалуйста решение. - Pascal
Найти сумму целых положительных чисел кратных 4 и меньших 100. Я тут чото нарешал - Program x1; Uses CRT; var S, i:integer; ...


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

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

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