<span>var
a: array[1..1000] of </span><span>longint</span>;
i,s,n:integer;
Процедуру заполнения напишешь сам, пишу алгоритм нахождения двухзначного числа(Количество чисел это n):
for i:=1 to n do
begin
if (a[i]>9) and (a[i]<100) then
begin
s:=s+1;
end;
end;
Если имеется в виду написать алгоритмом, то вот код на Pascal:
var x: integer;
x := sqrt(9 - 2 * sqrt(20)) - sqrt(9 + 2 * sqrt(20));
<span>38 ∙ 60 = 2280 байт информационный объем одной
страницы, 1.44 = 1509949,44 байт, 1509949,44 : 2280 = 662,26, следовательно поместится на дискете 662 страницы</span>
Ответ:
a:3:0
Объяснение:
Первое число - ширина поля вывода. Если ширина поля больше, чем длина числа, то вывод дополняется пробелами перед числом.
Второе число - количество цифр после запятой.
По-английски формат "Value : field_width : decimal_field_width"