В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
shorgk
shorgk
19.07.2021 16:22 •  Информатика

Перевод из паскаль в c++

var a: array[1..10] of integer;
i: integer;

begin

i=1;

repeat

readln(a[i]);

i: =i+1;

until i> 10;

end.

Показать ответ
Ответ:
23Аришка2765
23Аришка2765
06.03.2023 11:06

Усиленная квалифицированная электронная подпись (КЭП) — ключевой инструмент для участия в электронных торгах, отправки документов ОФД, интеграции с ЕГАИС и другими государственными системами документооборота. В отличие от усиленная подпись создается с криптографических алгоритмов и для полноценной работы требует определенного набора инструментов: криптопровайдера и специального плагина для правильной настройки браузера.

Признанный лидер на рынке криптопровайдеров — утилита КриптоПро CSP. В связке с ней функционирует Крипто Про Браузер плагин ЭЦП. Именно о нем и пойдет речь в статье.

0,0(0 оценок)
Ответ:
iweriooo
iweriooo
02.07.2021 00:36
Const
  MAX_SIZE = 10;
 
var
  a: array[1..MAX_SIZE] of integer;
  i, size: integer;
 
procedure delete_odd_elements();
var i, j: integer;
begin
  i := 1;
  repeat
    if odd(a[i]) then
    begin
      dec(size);
      for j := i to size do
        a[j] := a[j + 1]
    end
    else inc(i);
  until i > size;
end;
 
begin
  writeln('Исходный массив: ');
  size := MAX_SIZE;
  for i := 1 to size do
  begin
    a[i] := random(100);
    write(a[i] : 3);
  end;
  delete_odd_elements;
  writeln;
  writeln('Полученный массив: ');
  for i := 1 to size do
    write(a[i] : 3);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота