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

Составить программу позволяющую в одномерном массиве найти количество элементов массива не принадлежащих интервалу [a,b]

👇
Ответ:
Текст программы в прикрепленном файле
Составить программу позволяющую в одномерном массиве найти количество элементов массива не принадлеж
4,7(56 оценок)
Открыть все ответы
Ответ:
bestgad
bestgad
30.03.2023

табличні  величини

Объяснение:

т → просто буква т → т

граблі → убираем 2 первые буквы и 1 последнюю букву, т.к. до картинки стоит 2 запятые, а после 1 запятая → абл

и → просто буква и → и

ч → просто буква ч → ч

кінь → пишем слово справа налево, т.к. картинка перевёрнута → ьнік → убираем первую букву и последнюю букву, т.к. до картинки стоит 1 запятая и после 1 запятая → ні

собираем → табличні

лев → пишем слово справа налево, т.к. картинка перевёрнута → вел

и → просто буква и → и

ч → просто буква ч → ч

джин → убираем 2 первые буквы, т.к. до картинки стоит 2 запятые → ин

и → просто буква и → и

собираем → величини

4,6(44 оценок)
Ответ:
Russ1357900
Russ1357900
30.03.2023
Var a,b:longint;
function sum (n:integer):integer;
  var s:integer;
  begin
     s:=0;
     while (n<>0) do
       begin
         s:=s+n mod 10;
         n:=n div 10;
       end;
     sum:=s; 
  end;
  begin
    write ('A = ');
    readln (a);
    write ('B = ');
    readln (b);
    if sum(a) > sum(b) then
       writeln ('Сумма цифр 1ого числа больше на ',sum(a)-sum(b))
    else if sum(b) > sum (a) then 
       writeln ('Cумма цифр 2ого числа больше на ',sum(b)-sum(a))
    else writeln ('Сумма цифр 1ого числа равна сумме цифр 2ого числа');
    readln;
  end.
4,5(21 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ