Предназначенное для перевода текста или графики на физический носитель
из электронного вида малыми тиражами (от единиц до сотен) без создания печатной формы.
Var
A,B:integer;
S:real;
Begin
Write('A = ');
ReadLn(A);
Write('B = ');
ReadLn(B);
S:=0;
For B:= A to B do
S:=S+B*B;
WriteLn('S = ',S);
End.
Не знаю.Я только в 4-ом классе. Что писать я незнаю
Фотографии jpg занимают мало места , однако при сжатии теряется качество изображения!