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

Посчитать количество целых чисел кратных 7 и не оканчивающихся на 7 из промежутка от 1 до 10000 в паскале

👇
Ответ:
Верунчик80
Верунчик80
22.09.2021
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
  Print(Range(14,10000,7).Where(x->x mod 10<>7).Count)
end.

Результат выполнения программы:
1285
4,5(5 оценок)
Открыть все ответы
Ответ:
gvg1971
gvg1971
22.09.2021
А)
var    s:string;    mas:array ['a'..'z'] of longint;{индексы элементов соответствуют латинице}    c:char;    i:longint; begin      read(s);      for c:='a' to 'z' do{заполнение нулями элементов массива, для запоминания количества элементов в латинице}          mas[c]:=0;      for i:=1 to ord(s[0]) do{пробегаем по всей строке ord(s[0]) это количесвто элементов в строке (только паскаль)}          mas[s[i]]:=mas[s[i]]+1;      for c:='a' to 'z' do{пробегаем по массиву значений и выводим только неповторяющиеся}          if(mas[c]=1) then                       writeln(c); end.
4,5(93 оценок)
Ответ:
iskandarova174
iskandarova174
22.09.2021

1.Постановка задачи разрабатывается организацией, разработчиком программной продукции, на основании технического задания совместно с заказчиком. Главный исполнитель — это разработчик

2.Алгоритм-Последовательность действий, приводящих к результату.

Блок-схема- Графический записи алгоритма.

Исполнитель алгоритма-Человек, компьютер, автомат.

Язык программирования-Знаковая система для записи компьютерных программ.

Программа-Последовательность действий, приводящих к результату.

Объяснение:

Удачи тебе в учёбе!

4,7(59 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ