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

Найти сумму всех цифр n-значного числа. Написать программу на языке програмирования-Paskal​

👇
Ответ:
evgeniifedp08ruw
evgeniifedp08ruw
04.10.2021

var

a, s: integer;

begin

read(a);

s := 0;

while a > 0 do

begin

s := s + a mod 10;

a := a div 10;

end;

writeln(s);

end.

4,8(7 оценок)
Открыть все ответы
Ответ:
AlinaMalina1011
AlinaMalina1011
04.10.2021

#include <iostream>  //подключаем библиотеки

#include <fstream>  //подключаем библиотеки

using namespace std; //пространство имён

int main() {

 

setlocale(LC_ALL, "Russian"); //русский

 

int arr[10] = {5,4,6,17,2,3,16,9,8,1};

 

for(int i = 0; i < 10; i++) //сортируем масссив

{

 if (arr[i] % 2 == 0)  //все четные

 {

  arr[i] = 1;    //меняем значение

  cout << arr[i] << " ";  //выводим

 }else    //все нечетные

 {

  arr[i] = 10;    //меняем значение

  cout << arr[i] << " ";  //выводим

 }

}

 

return 0; //возращаем ничего

}

4,7(3 оценок)
Ответ:
Nastya21724
Nastya21724
04.10.2021

#include <iostream>


using std::cin;


using std::cout;


using std::endl;



int main() {


 

setlocale(LC_ALL, "Russian");


 

int input1, input2;


cout << "Введите число #1: ";


cin >> input1;


cout << "Введите число #2: ";


cin >> input2;


 

cout << input1 << " + " << input2 << " = " << input1 + input2 << endl;


cout << input1 << " - " << input2 << " = " << input1 - input2 << endl;


cout << input1 << " * " << input2 << " = " << input1 * input2 << endl;


cout << input1 << " / " << input2 << " = " << input1 / input2 << endl;


 

return 0;


}

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