Ввести число обозначающее количество секунд вывести то же самое время в минутах и секундах 175 ЧЕРЕЗ КУМИР
напишите программу
ответ: 2.55 мин
​

В зависимости от среды обитания вирусы можно разделить на сетевые, файловые, загрузочные и файлово-загрузочные. Сетевые вирусы распространяются по различным компьютерным сетям. Файловые вирусы внедряются главным образом в исполняемые модули, т.

Объяснение:

Существует несколько классификаций компьютерных вирусов:

1. По среде обитания различают вирусы сетевые, файловые, загрузочные и файлово-загрузочные.

2. По заражения выделяют резидентные и нерезидентные вирусы.

3. По степени воздействия вирусы бывают неопасные, опасные и очень опасные;

4. По особенностям алгоритмов вирусы делят на паразитические, репликаторы, невидимки, мутанты, троянские, макро-вирусы.

Var p, q: longint;
  n, i, j, c: integer;
begin 
  // 1
  write('n=');readln(n);
  for i := 1 to n do begin
    q := 1;
    for j := 1 to i do q := q * i;
    p := p + q;
  end;
  writeln ('Значение = ', p);
  
  // 2
  write('Число годовых оценок=');readln(n);
  p:=0;
  for i := 1 to n do begin
    write('оценка: '); readln(c);
    if c = 5 then p := p + 1
    else if c = 2 then p := - 1;
  end;
  writeln(p > 0);
  
  // 3
  n := 20; p := MaxInt;
  for i := 1 to n do begin
    write('Введите высоту здания ', i, ': ');
    readln(c);
    if c < p then p := c;
  end;
  writeln('Минимальная высота: ', p);
  
  //4
  n := 20; p := -1;
  for i := 1 to n do begin
    write('Введите высоту здания ', i, ': ');
    readln(c);
    if c > p then p := c;
  end;
  writeln('Максимальное значение высоты: ', p);
end.