Question

Помогите найти ошибку в коде в программе Pascal abc.net
При умножении 14 на 365 получается ответ 0, почему?

program Lipov_2;
var a, b, k: integer;
begin
writeln('a=14');
writeln('b=365');
k:=a*b;
writeln('a*b=', k);
end.

Answer 1

Не заданы значения переменных.

Правильный код:
program Lipov_2;
var a, b, k: integer;
begin
a:=14;
b:=365;
writeln('a=', a); 
writeln('b=', b); 
k:=a*b;
writeln(a,'*',b,'=', k);
end.