Var n,i: integer;
begin
readln(n);
for i:=1 to 9 do
writeln(n,'*',i,'=',n*i);
end.
Примеры?
Дискета
Жесткий диск
Компакт-диск
Карта памяти
Флешка
Кассета
Пластинка
Перфокарта
Можно долго продолжать этот список...
Сидел, искал информацию в интернете по поводу неприкладных программ и по сути ничего толкового не нашел. Но судя по тому, что прикладные программы - это почти все программы которыми мы пользуемся (всевозможные редакторы, мультимедиа приложения, разные системы и т.п) и ставятся на компьютер они после, отдельно.
Могу сделать вывод, что неприкладными программами можно считать системный софт <span>(типа микропрограмм, или firmware), и по сути они являются частью оборудования.</span>
Я уже отвечал вашему однокласснику, видимо ;) Ответ - -16
почему бы тебе не закинуть все в одно задание?)
не первый раз тебе пишу уже)
program p_4;
var
i, n, count: word;
begin
readln(n);
count := 0;
for i := 1 to n do begin
if n mod i = 0 then inc(count)
end;
writeln(count)
end.