Помогите найти ошибку в коде в программе Pascal abc.net При умножении 14 ** 365...

0 голосов
42 просмотров

Помогите найти ошибку в коде в программе 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.


Информатика (130 баллов) | 42 просмотров
Дан 1 ответ
0 голосов

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

Правильный код:
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.

(18 баллов)