|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.02.2023, 23:10 | #1 |
Пользователь
Регистрация: 14.02.2023
Сообщений: 10
|
Kotlin:Найти сумму всех отрицательных чисел в файле
Есть код C++
int main() { ifstream inputFile("input.txt"); // открыть файл для чтения ofstream outputFile("output.txt"); // открыть файл для записи double number; double sum = 0; while (inputFile >> number) { // читать числа из файла по одному if (number < 0) { // если число отрицательное, добавить его к сумме sum += number; } } outputFile << sum; // записать сумму в файл вывода inputFile.close(); // закрыть файл ввода outputFile.close(); // закрыть файл вывода return 0; } Как это можно оформить на языке Kotlin, подскажите пожалуйста |
23.03.2023, 09:35 | #2 |
C/C++, Java
Участник клуба
Регистрация: 28.03.2012
Сообщений: 1,680
|
Код:
"Keep it simple" - придерживайтесь простоты!
Уильям Оккам - "Не следует множить сущее без необходимости" Сложность - враг простоты и удобства! |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Дан массив а(n) типа SWORD. найти сумму всех отрицательных элементов массива.помогите найти ошибку | Юлия123456 | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 2 | 07.09.2016 06:12 |
программа паскаль: найти сумму всех отрицательных элементов одномерного массива и заменить на это значение первый отрицательный | skr121 | Паскаль, Turbo Pascal, PascalABC.NET | 6 | 21.04.2016 13:25 |
visual basic. Дана последовательность из М чисел. Найти сумму и произведение всех положительных чисел | СергейКл | Помощь студентам | 12 | 20.05.2015 17:17 |
Дана непустая последовательность целых чисел. Найти: Сумму чисел, больших числа x и количество всех чётных чисел | maksim97maksim | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 09.04.2014 13:59 |
Pascal - Найти сумму всех ее отрицательных элементов и заменить ею все диагональные элементы этой матрицы | NewBi | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 24.04.2010 09:15 |