//Pascal
const
n = 5;
m = 5;
var
i, j, k: integer;
a: array [1 .. n, 1 .. m] of integer;
begin
for i := 1 to 5 do
begin
for j := 1 to 5 do
begin
A[i, j] := j;
write(A[i, j]:3);
end;
writeln;
end;
readln;
end.
Var n: integer;
<span>begin
</span><span> write('число: '); readln(n);
</span><span> repeat
</span><span> write(n mod 10);
</span><span> n:=n div 10;
</span><span> until n=0;
</span><span>end.
</span><span>
Ввод - вывод:
</span>число: 589
<span>985
</span>
Укажите результаты редактирования текста, если нажата клавиша ENTER:
Знание - | сила
А) Знание - сила.
Б) Знание - ила.
В) Знание -сила.
Ответ: a) Знание - сила.
1F=1х16 в первой + 15х16 в нуливой=16+15=31
////////////Pascak abc//////////////
Программа во вложении