Від програми в якому він створюється, редагується, зберігається.
//Pascal ABC.NET v3.1 сборка 1219
Var
a,b,c:integer;
begin
read(a,b,c);
if a+b+c>100 then writeln('Сумма больше 100=',a+b+c) else writeln('Сумма=',a+b+c);
end.
Пример ввода:
200
50
8
Пример вывода:
Сумма больше 100=258
Дано:
Книга содержит 15 страниц.
На каждой странице - 20 строк.
В каждой строке 40 символов
1) 15 * 20 * 40 = 1200 - символов всего.
2) 1200 * 6 = 72000 байтов = 70.31 килобайтов
Ответ: 70.31 килобайтов.
Var
x:real;
Begin
x:=-5;
repeat
writeln('y = ',sqr(x));
x:=x+0.5;
until(x>5)
End.
Сu(OH)₂→CuO+H₂O
n(CuO)=40/80=0.5моль
n(CuO):n(Cu(OH)₂)=1:1=0.5моль
n(CuO):n(H₂O)=1:1=0.5моль
m(Cu(OH)₂)=0.5*98=49г.
m(H₂O)=0.5*18=9г