через оператор while - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 5.00/5:

@саша 1.9.9.4 5 / 5 / 0 Регистрация: 17.05.2011 Сообщений: 53

	через оператор while 17.05.2011, 21:50. Показов 1000. Ответов 1 Метки нет (Все метки) Дано целое число N. Вывести наибольшее из целых чисел К, для которых сумма 1+2+…+К будет меньше или равна N, и саму эту сумму. 0

Лучшие ответы (1)

Сообщение: #1662041

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

17.05.2011, 21:50

Ответы с готовыми решениями:

Почему обращение к методам осуществляется через оператор прямого доступа, а не через оператор указателей->?
#include <iostream> using namespace std; class random { public: void Set(int b){a=b;} int Get(){return a;} private: ...

Написать программу, содержащую оператор оператор for для счета от 2 до 5 через 1
В С++ я ноль, помогите пожалуйста написать прогу Написать программу, содержащую оператор оператор for для счета от 2 до 5 через 1 ...

Нужно, чтобы память под массив выделялась не через: new — delete, а через оператор malloc (calloc) — free
Ребят, есть программа, которая работает, но нужно, чтобы память под массив выделялась не через : new - delete, а через оператор...

Omlette

19 / 19 / 17

Регистрация: 29.03.2011

Сообщений: 45

18.05.2011, 00:13

Сообщение было отмечено саша 1.9.9.4 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var n,k,s,i:integer;
begin
 writeln('Ââåäèòå ÷èñëî ');
 readln(n);
 s:=0;k:=0;
 while (s<=n) do
  begin
   k:=k+1;
   s:=s+k;
  end;
 writeln('Ñóììà ðàâíà ',s-k,', íàèáîëüøåå ÷èñëî ðàâíî ',k-1);
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

18.05.2011, 00:13

Помогаю со студенческими работами здесь

через оператор if
День добрый, можно ли как то написать программу через if которая будет определять количество дней в месяце только не так if a=1 then...

через оператор For
Дано целое число N. Найти сумму N2+(N+1)2+(N+2)2+…+(2*N)2 2 после скобок и первой N это квадрат

Через оператор switch в си
Фирма «Товары – почтой!» осуществляет доставку заказанных товаров по стране. Расстояние, на которое доставляются товары, находится в...

Написать через оператор while
Здравствуйте, возник такой вопрос. Написал совсем простенькую программу и вроде бы всё хорошо, но тут возникла некоторая обходимость. ...

Задачки через оператор if
1. Пользователь вводит букву на латинице - нужно вывести маленькая это буква или большая. 2. Пользователь вводит букву на латинице....

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .

Наверх