//clc()
MK = 39.1;
MC = 12.0;
MO = 16;
MK2CO3 = MK * 2 + MC + MO * 3;
m = 691;
N = m / MK2CO3;
A = 6.023 * 10^23;
molecules = N * A;
disp("molecules",molecules,"Total no. of molecules =")