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

Удалите из массива все элементы, содержащие в своей записи цифру 5.

👇
Ответ:
avruchka7
avruchka7
06.05.2022
//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ars:array[1..n] of string;
 i,j,k:integer;
begin
k:=n;
 for i:=1 to n do
 readln(ars[i]);
 for i:=1 to n do
  if pos('5',ars[i])<>0 then
   begin;
    for j:=i to n-1 do 
     ars[j]:=ars[j+1];
     dec(k);
   end;
 writeln('Final array:');
  for i:=1 to k do
  writeln(ars[i]);
end.

Пример ввода:
3434
5656
6767
5757
8989
Пример вывода:
Final array:
3434
6767
8989
4,4(82 оценок)
Ответ:
Lelik213
Lelik213
06.05.2022
  const n =30;
 var
 s:string; 
i,k,m:integer; 
a:array[1..n] of integer; 
b:array[1..n] of integer; 
begin 
for i:=1 to n do
 readln(a[i]);
 k:=1    ;
for i:=1 to n do 
begin 
str(a[i],s);
 if pos('5',s) = 0 then 
begin 
b[k]:= a[i]; 
k:=k+1; 
end; end;
for i:= 1 to n do
a[i]:=b[i]; 
for i:= 1 to n do 
write(a[i],' '); 
end.
4,8(65 оценок)
Открыть все ответы
Ответ:
dima03102003
dima03102003
06.05.2022
. Правда это относится скорее к автоматизации, чем к роботизации. А потом стало не до хайтека.

После войны одним из главных направлений в развитии высоких технологий стала космонавтика. Кроме того, армия нуждалась в качественно новых образцах вооружений. Поэтому в 1951 в МГТУ им. Баумана была открыта кафедра СМ-7 «Специальная робототехника и мехатроника». В стране активно развивается теория вычислительных машин и автоматизации программирования, создаётся элементная база, вводятся в эксплуатацию ЭВМ, не уступающие лучшим мировым образцам (МЭСМ, Сетунь, АВМ МН-10, СВМ 5Э89 Курс, Днепр), создаются новые коллективы учёных и инженеров для создания робототехники.
4,4(45 оценок)
Ответ:
юка28
юка28
06.05.2022
Использовать Чертежник
алг Слон
нач
опустить перо
сместиться на вектор(2, 0)
сместиться на вектор(0, 2)
сместиться на вектор(1, 0)
сместиться на вектор(0, -2)
сместиться на вектор(2, 0)
сместиться на вектор(0, 2)
сместиться на вектор(1, 1)
сместиться на вектор(0, 2)
сместиться на вектор(1, -2)
сместиться на вектор(-1, 2)
сместиться на вектор(-1, 1)
сместиться на вектор(-3, 0)
сместиться на вектор(-1, 1)
сместиться на вектор(-1, 0)
сместиться на вектор(-1, -2)
сместиться на вектор(-1, 0)
сместиться на вектор(0, 3)
сместиться на вектор(-1, 0)
сместиться на вектор(0, -3)
сместиться на вектор(1, -1)
сместиться на вектор(2, -1)
сместиться на вектор(0,-3)
поднять перо
сместиться на вектор(1, 3)
опустить перо
сместиться на вектор(1, 1)
сместиться на вектор(0, 2)
поднять перо
сместиться на вектор(-2, -1)
опустить перо
сместиться на вектор(-0.1, 0.1)
сместиться на вектор(-0.1, -0.1)
сместиться на вектор(0.1, -0.1)
сместиться на вектор(0.1, 0.1)
поднять перо
сместиться на вектор(0, -5)
кон
от нарисовать танк в кумире, просто напиши код ​
4,4(58 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ