Прикладные программы непосредственно обеспечивают выполнение необходимых работ (расчёты, редактирование текста, рисование и пр.)
<u>Microsoft Excel, Corel Draw, Adobe Photoshop, Microsoft Office World (Power Point и т.д.)
</u>Системные программы выполняют различные вспомогательные функции (создание копий, проверка работоспособности и пр.)
<span><u>Windows , Novell , Mac OS</u></span>
(если сумма цифр числа делится на 3, то число делится на 3 нацело)
var a, s: integer;
begin
s:=0;
writeln ('Введите число');
while a<> 0 do
begin
a:= a mod 10
S:=s+a;
end;
if S mod 3 = 0 then writeln ('делится') else
writeln ('не делится');
end.
В таблице:
9 л 9 4 4 - 9 8 8 3
<span>5 л - 5 - 4 4 5 - 5</span>
1)
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
Writeln(n div 10 - n mod 10)
end.
2)
var
a:real;
begin
writeln('Площадь в ар.: ');
Read(a);
Writeln('Кв,км: ',Trunc(a/10000))
end.
Объединенные сети.
Это значит что сети объеден или в одну огромную и любой может взять из этой огромной семьи все, что найдет