М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
aze1234
aze1234
03.06.2022 15:11 •  Информатика

Водномерном массиве произвольных чисел найти количество нечётных элементов(паскаль)

👇
Ответ:
xDanielDash
xDanielDash
03.06.2022
function f(a: array of integer): byte;
begin
  foreach i: integer in a do
    if (i mod 2 = 1) then
      result += 1;
end;

begin
  var a: array of integer := new integer[50];
  for var i := 0 to 49 do
  begin
    a[i] := random(1, 300000);
    write(a[i], ' ');
  end;
  
  writeln(#13, #13, f(a));
end.
4,4(92 оценок)
Открыть все ответы
Ответ:
kostyaluch
kostyaluch
03.06.2022
Function t10_q(x,q:longint):string;
const
  s='0123456789ABCDEFGHI';
var
  t,m:longint;
  r:string;
begin
  t:=x; r:='';
  while t>=q do
  begin
    m:=t mod q;
    r:=s[m+1]+r;
    t:=t div q
  end;
  t10_q:=s[t+1]+r
end;

{ тестирование }
var
  q,n:longint;
begin
  Write('Введите основание системы счисления (2-20): '); Readln(q);
  Write('Введите натуральное число для перевода: '); Readln(n);
  Writeln(n,'(10)=',t10_q(n,q),'(',q,')')
end.

Тестовое решение:
Введите основание системы счисления (2-20): 16
Введите натуральное число для перевода: 16350
16350(10)=3FDE(16)
4,6(15 оценок)
Ответ:
buniatyansona
buniatyansona
03.06.2022
1)Электронное письмо состоит из следующих частей: 

* Заголовков SMTP-протокола, полученных сервером. Эти заголовки могут включаться, а могут и не включаться в тело письма в дальнейшем, так что возможна ситуация, когда сервер обладает большей информацией о письме, чем содержится в самом письме. Так, например, поле RCPT TO указывает получателя письма, при этом в самом письме получатель может быть не указан. Эта информация передаётся за пределы сервера только в рамках протокола SMTP, и смена протокола при доставке почты (например, на узле-получателе в ходе внутренней маршрутизации) может приводить к потере этой информации. В большинстве случаев эта информация не доступна конечному получателю, который использует не-SMTP протоколы (POP3, IMAP) для доступа к почтовому ящику. Для возможности контролировать работо системы эта информация обычно сохраняется в журналах почтовых серверов некоторое время. 
* Самого письма (в терминологии протокола SMTP — 'DATA'), которое, в свою очередь, состоит из следующих частей, разделённых пустой строкой: 
* Заголовков письма, иногда называемых по аналогии с бумажной почтой конвертом (англ. envelope). В заголовке указывается служебная информация и пометки почтовых серверов, через которые письмо, пометки о приоритете, указание на адрес и имя отправителя и получателя письма, тема письма и другая информация. С термином «конверт» есть некоторая путаница, потому что в зависимости от ситуации «конвертом» называют либо заголовок письма, либо информацию, которой располагает SMTP-сервер после получения письма (так, например, в документации к почтовому серверу postfix, термин «конверт» используется в отношении SMTP-данных, включающих не только поля RCPT TO и MAIL FROM, но и IP-адрес отправителя, его строчка HELO и т. д. ) 
* Тела письма. В теле письма находится, собственно, текст письма. Согласно стандарту, в теле письма могут находиться только символы ASCII. Поэтому при использовании национальных кодировок или различных форм представления информации (HTML, RTF, бинарные файлы) текст письма должен кодироваться по стандарту MIME и не может быть прочитан человеком без использования декодера или почтового клиента с таким декодером.
4,5(61 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ