Сколько дюймов в 18 точках (pt)? (ответ округли до сотых!)

18 (pt) = ...... дюймов.

Сколько см в 18 (pt)? (ответ округли до сотых!)

18 (pt) = ..... cм.

1)
program Ok;
const n = 10;
var
A:array[1..n] of real;
sum:real;
i:integer;
begin
sum:=0;
for i:=1 to n do
begin
read(A[i]);
sum:=sum+A[i];
end;
sum:=sum/n;
for i:=1 to n do
begin
if(A[i]<sum) then
writeln(A[i]);
end;
end.
2)
program Ok;
const n = 10;
varA:array[1..n] of real;
sum:real;
i,k:integer;
begin
sum:=0;
for i:=1 to n do
begin
read(A[i]);
if (i mod 2 = 1) then
sum:=sum+A[i];
if (i mod 2 = 1) then
k:=k+1;
end;
sum:=sum/k;
write(sum);
end.

/*VS C++*/
#include <iostream>
using namespace std;
int main() {
    setlocale(LC_ALL, "Russian");
    int a, b, c, d, e, f;
    cout << "Введите цену товара(два числа): ";
    cin >> a >> b;
    cout << "Сколько заплатили за товар(два числа): ";
    cin >> c >> d;
    f = (100 * c + d - 100 * a - b) % 100;
    e = (100 * c + d - 100 * a - b) / 100;
    cout << e << " руб." << f << " коп." << endl;
    system("pause");
    return 0;
}

За этим не сюда, такое просто не будут делать, есть куча форумов, где сидят ОНЛИ программисты, которые помогут. Всё, что тебе нужно - зарегистрироваться и подробно описать, что тебе нужно, только не в там настрое, типа, тебе все обязаны, если будешь вежливо общаться -  тебе помогут. Если нужны такие форумы - пиши в ЛС. Удачи!

А)  когда получают знания о чем то то неизвесность уменьшается