<em>Вкладка — элемент графического интерфейса пользователя, который позволяет в одном окне приложения переключение между несколькими открытыми документами или предопределёнными наборами элементов интерфейса, когда их доступно несколько, а на выделенном для них пространстве окна можно показывать только один из них.</em>
<em>Список — способ оформления перечней в тексте.</em>
<em>Контекстное меню - меню, набор команд в котором зависит от выбранного, или находящегося под курсором в момент вызова объекта, а также состояния рабочей среды и программы, в которой этот объект находится — то, что в совокупности представляет собой контекст для этого меню.</em>
Еще бы разобрать что там написано..
var a: array [1..12] of integer;
i,s:integer;
begin
Randomize;
write('Массив: ');
for i:= 1 to 12 do
begin
a[i]:=random(10,30);
write (a[i],' ');
if a[i] mod 10=0 then s:=s+1;
end;
writeln(' ');
write('Количество чисел, оканчивающихся на "0": ',s);
end.
PROGRAM ThreeNumbers;
VAR
numberOne : DOUBLE;
numberTwo : DOUBLE;
numberThree : DOUBLE;
sum : DOUBLE;
product : DOUBLE;
average : DOUBLE;
BEGIN
WriteLn('Введите три числа:');
Write('Число 1 -->');
ReadLn(numberOne);
Write('Число 2 -->');
ReadLn(numberTwo);
Write('Число 3 -->');
ReadLn(numberThree);
sum := numberOne + numberTwo + numberThree;
product := numberOne * numberTwo * numberThree;
average := (numberOne + numberTwo + numberThree) / 3.0;
WriteLn('Сумма = ', sum:6:1);
WriteLn('Произведение = ', product:6:1);
WriteLn('Среднее = ', average:6:1);
END.
program raf105;
var
i,a,b: integer;
begin
write('Введите 2 числа (начало и конец диапазона): ');
readln(a,b);
for i:=a to b do
writeln(i);
end.
<h3><u>PascalABC 3.4.2</u></h3>