Форум программистов, компьютерный форум, киберфорум
Наши страницы

Преобразовать - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Нужно написать программу, которая считывает текст из файла и выводит на экран только строки, не содержащие двузначных чисел http://www.cyberforum.ru/cpp-beginners/thread175581.html
Здравствуйте! Нужно написать программу, которая считывает текст из файла и выводит на экран только строки, не содержащие двузначных чисел. С файлами и строками в с++ сталкиваюсь в первый раз,по...
C++ Класс Вектор Решил написать свой класс вектор, приблизительно как в СТЛ. Сначала решил сделать каркас. Все функции без аллокатора и итератора. Сделал. И теперь возникла проблема. Стоит ли писать самому... http://www.cyberforum.ru/cpp-beginners/thread175577.html
Создать два потока, которые в конечном цикле инкримируют 1 переменную заданое число раз C++
Дядьки и Тетьки Я только начал что изучать, что-то похожее на С++ но не уверен, если не прав прошу тему перенести. Но Помогите с задачкой: Создать два потока, которые в конечном цикле инкримируют 1...
C++ Двумерные массивы
Помогите люди добрые:) Дана целочисленная прямоугольная матрица, определить: 1) Кол-во отрицательных эл-тов тех строк, которые содержат хотя бы один нулевой элемент. 2) Номер строк и столбцов всех...
C++ нужно реализовать вычисления в восмеричной системе, направьте мысль пожалуйста http://www.cyberforum.ru/cpp-beginners/thread175553.html
по заданию нужно написать транслятор, реализующий ограниченный набор функций паскаля и работающий только с восмеричной системой счисления. возникла сложность как реализовать работу с восмеричной...
C++ Вычисление значений математических выражений с рациональными числами Доброго времени суток. Задача состоит в: пользователь вводит выражение (пример: 3,25+6,42*2-12,11/8 и т.д.) , а программа его считает. Просто, как веник. Выражение произвольной длинны. Защита от... подробнее

Показать сообщение отдельно
murderer
3202 / 1426 / 75
Регистрация: 06.10.2010
Сообщений: 3,145
12.10.2010, 19:22
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
read(n);
c:=0;  m:=0;
for i:=1 to n do
begin
    read(x);
    if x<1 then
        c:=0
    else
        c:=c+1;
    if c>m then
        m:=c;
end;
write(m);
1
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru