Надо знать команды и написать их
<span><em>1. Pascal ABC</em>
const
nn=100;
var
M,C:array[1..nn] of integer;
x,i,n,s,max:integer;
m1,r:real;
begin
Write('x=');
Read(x);
Write('>');
s:=0;
n:=0;
for i:=1 to x do begin
Read(M[i]);
if M[i]>3 then begin
s:=s+M[i];
n:=n+1
end
end;
if n>0 then m1:=s/n
else m1:=0;
max:=M[x];
for i:=x-1 downto x-9 do
if M[i]>max then max:=M[i];
r:=max/m1;
n:=0;
for i:=1 to x do
if M[i]>r then begin
n:=n+1;
C[n]:=M[i];
Write(C[n],' ')
end;
end.</span>
<u>Пример</u>
x=18
>-15 -19 -32 3 2 35 32 12 -44 39 -36 16 31 5 17 21 -43 -20
3 2 35 32 12 39 16 31 5 17 21
<em>2. PascalABC.NET 3.2, сборка 1370 от 24.12.2016</em>
<em>Если программа не работает, обновите версию! </em>
begin
var M:=ReadArrInteger('>',ReadInteger('x='));
var r:=(M.TakeLast(10).Max)/(M.Where(b->b>3).Average);
var C:=M.Where(b->b>r).ToArray; C.Println
end.
<u>Пример</u>
x= 18
> -15 -19 -32 3 2 35 32 12 -44 39 -36 16 31 5 17 21 -43 -20
3 2 35 32 12 39 16 31 5 17 21
<u>Сравнение явно не в пользу школьного программирования...</u>
Ну, для того, чтобы сравнить эти 2 значение. Нужно обратиться непосредственно к словарю.
Чем отличаются данные от программы?
<span><u>Данные</u> могут обрабатываться человеком, которому принадлежат сами данные.
</span><u>Программа </u>Управление компонентами вычислительной системы и формирование среды для функционирования прикладных программ берёт на себя системное программное обеспечение<span>, наиболее важной составляющей которого является </span>операционная система<span>. То есть все делает компьютер.)
</span><span>Общее.
</span>Скорее всего, что у данных есть 2 типа - двоичные и текстовые. Ну, а так как программа часть компьютера, то эти типы и ей принадлежат.)
Двоичные данные обрабатываются только специализированным программным обеспечением<span>, знающим их структуру, все остальные программы передают данные без изменений.
</span>Ну, и.
С точки зрения программиста, данные — это часть программы, совокупность значений определённых ячеек памяти, преобразование которых осуществляет код. С точки зрения компилятора, процессора, операционной системы, это совокупность ячеек памяти, обладающих определёнными свойствами (возможность чтения и записи ), невозможность исполнения).
Если, что-то не так, то заранее извини.)
Жили-были дед да баба в Розовом Королевстве. Все жители этого королевства обожали розовый цвет и предпочитали его всем другим цветам. Даже лапти люди носили розового цвета. Однажды внучка в розовом платьице ушла в розовый лес, чтобы собрать розовые грибы в розовом лесу. Но она побежала за розовой лягушкой и заблудилась. Но тут она увидела розового сокола, который сел на полянку, посадил девочку на свою розовую спину и улетел к бабушке и дедушке в их розовый домик. Через некоторое время они поженились и на их свадьбе было очень много розовых роз.
Либо вот:
Шёл как-то бедный мужик, шел по чистому полю, увидал под кустом зайца, обрадовался и говорит:
<span>— Вот когда заживу домком-то! Возьму этого зайца, убью плетью да продам за четыре алтына. На те деньги куплю свинушку. Она принесет мне двенадцать поросеночков. Поросятки вырастут, принесут еще по двенадцати. Я всех приколю, амбар мяса накоплю. Мясо продам, а на денежки дом заведу да сам женюсь. Жена-то родит мне двух сыновей: Ваську да Ваньку. Детки станут пашню пахать, а я буду под окном сидеть да порядки наводить: «Эй вы, ребятки, — крикну, — Васька да Ванька! Шибко людей на работе не подгоняйте, видно, сами бедно не живали! » Да так-то громко крикнул мужик, что заяц испугался и убежал, а дом со всем богатством, с женой и с детьми пропал.</span>
Program Z1;
Var a,b,S:integer;
Begin
Readln(a,b);
S:=a*b;
Writeln(S);
end.