Скачиваний:
9
Добавлен:
01.05.2014
Размер:
28.67 Кб
Скачать

Опишите запись с именем типа Systemа, содержащую информацию о планетах солнечной системы: номер планеты по удалению от солнца (тип integer), название планеты (тип string), объем (real), диаметр (real), удаление от земли (real)

Название программы следует после служебного слова program, программа называется Systema. Далее слово type определяет тип данных - запись (record) и называние этого типа - Systema. Далее мы назначаем номеру планеты по удалению от Солнца тип integer, то есть целое число. Названию планеты мы задаем строковый тип данных string. Объем, диаметр и удаленность от земли мы задаем числами с плавающей запятой real. После слова var, описывается наша запись с именем systema. Программа начинается после слова begin.

program Systema;

type systema=record

nomer:integer;

name:string;

obem:real;

diametr:real;

length:real;

end;

var sys:systema;

begin

end.