Нужна блок-схема к программе: Program K1 var a,b,c,n:integer; Begin read(a,b,c); n = (a div c) * (b div c); writeln(n); writeln(a*b-n*c*c); End.
У Вас ошибка - присвоение в Паскале обозначается знаком ":=" (без кавычек).
Всё на картинке, извиняюсь за кривость)
Спасибо большое)