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

Найти все трехзначные числа у которых сумма цифр равна а , а само число делится на в. паскаль. 40 .

👇
Ответ:
dsanavskiy77
dsanavskiy77
17.05.2021

program test;

var i,a,b:integer;

BEGIN

writeln('Enter a:');

readln(a);

writeln('Enter b:');

readln(b);

for i:=100 to 999 do

   begin

   if i div 10) mod 10)+(i div 100)+(i mod 10) )= a) and (i mod b=0)  then writeln(i);

   end;

END.

4,7(3 оценок)
Открыть все ответы
Ответ:
DashaLOVE04
DashaLOVE04
17.05.2021

Вам нужно:

1) перевести строку в массив символов

2) узнать длину полученного массива

3) создать ещё один пустой символьный массив

4) создать цикл, в котором будут записываться элементы первого массива во второй, пока не встретится запятая. если же встретилась запятая, то заканчиваем выполнение цикла

5) узнать размер нового массива, который состоит из букв первого слова

6) вывести последний элемент нового массива, что и будет последней буквой первого слова

алгоритм, в общем-то, такой. Вам нужно лишь перевести это в код на нужном языке программирования

4,6(6 оценок)
Ответ:
медведь44
медведь44
17.05.2021

#include <iostream>

#include <string>

 

bool check_func(char ch)

{

   if(ch == ' ' || ch == ',')

       return true;

   return false;

}

 

int main()

{

   std::string s;

   int index = 0, counter = 0;

   std::cout << "Enter string: ";

   getline(std::cin, s);

   

   while(s[index])

   {

       if(!check_func(s[index]))

       {

           while(!check_func(s[index]))

           {

               index++;

           }

           counter++;

       }

       index++;

   }

   

   std::cout << counter << "\n";

   

   system("pause");

   return 0;    

}

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