lilyavenkova
24.01.2023 03:26

ответить на вопросы. 1)сообщение,не содержащее для вас новую (значимую) информацию (15 букв)
2)Наука о закономерностях протекания информационных процессов в системах различной природы, о методах, средствах и технологиях автоматизации информационных процессов (11 букв)
3)разговорный язык различных национальностей (11 букв)
4)содержание сообщений получаемых человеком (10 букв)
5)самая древняя форма письменности, идущая от первобытных людей (16 букв)
6)письменность, в которой отдельные буквы или сочетания букв означают звуки речи,препинания - паузы и интонацию (8 букв)
7)звуковой знак устной речи , из которой складываются слова (6 букв)
8)вид письменной речи , в котором один значок обозначает слог (япония) (8 букв)
9)язык определённых профессий или областей знаний (10 букв)
10)ощущение запаха определять запах веществ , рассеянных в воздухе (8 букв)
11)знаковый представления информации (4 буквы)
12)совокупность правил записи текста на языке (9 букв)
13)система правил и соглашений определяющая толкование и придание смысла конструкциям языка (9 букв)
14)вид письменности широко используемой в китае , где иероглифом обозначается одно слово (15 букв)
15)знание, которое определяет действие для достижения цели (11 букв)
записи программ для управления ЭВМ (16 букв)
17)определенный вид знаний об определённых явлениях, свойствах объектов и зависимостях (13 букв)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Galinachlen
20.04.2021 23:05
Решение для одного-двух разных удаляемых символов

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('>');
  s:=s.Replace('.','').Replace(',','');
  s.Println
end.

Пример
> Раз, два, три, четыре, пять. Вышел зайчик погулять.
Раз два три четыре пять Вышел зайчик погулять

Решение, когда разных удаляемых символов может быть много

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var s:=ReadlnString('>');
  s:=s.Where(с->not(с in [',','.'])).JoinIntoString;
  s.Println
end.
0,0(0 оценок)
Ответ:
alalosh
05.05.2022 12:08

Ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z:integer;

begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
while (z = 1) do
begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
end;

end. 

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота