Ну ок объясню
30 страниц в каждой странице 40 строк и получается 30х40=1200 строк это всего строк в статье.
В каждой строке 50 символов, получаестя 1200х50=60000(символов) это сколько символов в статье. Всё!
ЕСЛИ (А = ложь ИЛИ (В = истина И D = истина)), ТО С = истина
Так?
<span>Количество битов на один пиксель</span>
program zadacha;
Var x,a,b :real;
begin
readln (a,b);
if a<>0 then x:=-b/a;
Writeln ('x= ',x);
end.
Var
a: integer;
begin
readln(a);
while (a > 3) do
a := a - 4;
writeln(a);
end.
-------------
Если нужно отнимать, даже если число перестанет быть отрицательным после очередной итерации:
var
a: integer;
begin
readln(a);
while (a > 0) do
a := a - 4;
writeln(a);
end.