1. Що таке таблична величина? 2. Як оголошується зминна тіпу таблична величина в рядку var?

3. Що таке властивість?

4. Які властивості багаторядкового текстового поля?

1.Упорядкований набір змінних одного типу називається табличною величиною, або одновимірним масивом. Кожна змінна (клітинка таблиці), що входить до табличної величини, називається її елементом.

2.var a: array[1..10] of real

3.Властивість — філософська категорія, яка виражає один з моментів виявлення сутності речі у відношеннях з іншими речами; те, що характеризує її подібність до інших предметів або відмінність від них. Властивість пов'язана з якістю (див. якість і кількість).

4.Багаторядкові текстові поля

Властивість MultiLine визнача іб відображення текстового поля. При встановленому значенні True текст елемента управління TextBox може розташовуватися на декількох рядках. При введенні інформації в поле для переходу на новий рядок необхідно натискати клавішу <Enter>.

var

n,a: integer;

begin

readln(n);

a: =(n mod 10)*1000+((n mod 100) div 10)*100 + ((n mod 1000) div 100)*10+ n div 1000;

if n> a then

writeln('число ', n, ' больше перевертыша ', a)

else

writeln('перевертыш ', a, ' больше числа ', n);

end.

program rrr; uses crt; const n=9; type massiv=array[1..n]of real; var a: massiv; max,sr: integer; procedure vvod(var x: massiv); var i: integer; beginwriteln('wwedite massiv'); for i: =1 to n doreadln(x[i]); end; procedure vivod(x: massiv); var i: integer; beginfor i: =1 to n dowrite(x[i]: 6: 2,' '); end; procedure sred_ar_i_max(x: massiv,var sr,max: real); var sum: real; i: integer; begins: =0; for i: =1 to n doif x[i]> 0 then s: =s+x[i]; end; sr: =s/n; for i: =1 to n doif (x[i]> 0) and max< x[i] then max: =x[i]; end; vvod(a); clrscr; vivod(a); sred_ar_i_max(a,sr,max); writeln('max=',max: 6: 2,'srednee arifmet=',sr: 6: 2); readln; end.