Известна стоимость монитора, системного блока, клавиатуры и мыши. Сколько будут стоить n компьютеров. Написать программу в Poscal ABC

Простая задача, держи: var a,b,c,d,n,j:integer; begin writeln('Стоимость монитора'); readln(a); writeln('Стоимость системного блока'); readln(b); writeln('Стоимость клавиатуры'); readln(c); writeln('Стоимость мышки'); readln(d); writeln('Сколько компьютеров нужно?'); readln(n); j:=(a+b+c+d)*n; writeln('Стоимость ', n, ' компьютеров = ',j); end.

var m,s,c,k,n:integer; begin writeln('Стоимость монитора:'); readln(m); writeln('Стоимость системного блока: '); readln(s); writeln('Стоимость клавиатуры:'); readln(c); writeln('Стоимость мыши:'); readln(k); writeln('Кол-во компьютеров'); readln(n); writeln('Цена покупки: ',(m+s+c+k)*n); end.