Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal Как поменять местами первую и вторую половину слова? Короче, нужно поменять местами первую и вторую половину слова, в первом случае если известно количество букв, а во втором неизвестно. Все в паскале, спасибо заранее! https://www.cyberforum.ru/ turbo-pascal/ thread435878.html	Turbo Pascal последовательности и массив помогите решить задачку! Дана последовательность натуральных чисел а1,а2,...аn. Создать массив из четных чисел этой последовательности,если таких чисел нет, то вывести сообщение об этом на экран.
Turbo Pascal Является ли сумма элементов четвертой строки массива двузначным числом https://www.cyberforum.ru/ turbo-pascal/ thread435853.html Дан двумерный массив. Выяснить является ли сумма элементов четвертой строки массива с известным номером двузначным числом.	Turbo Pascal Определить количество элементов второго столбца массива, больших 15 Дан двумерный массив чисел. Определить, количество элементов второго столбца массива, больших 15. https://www.cyberforum.ru/ turbo-pascal/ thread435850.html
Turbo Pascal Матрицы Помогите пожалуйста написать программу которая выполняет действие над матрицами: расчет алгебраического дополнения, минор каждого элемената, транспортирование матрицы. Вывести полученную матрицу на экран Как решать матрицы на бумаге я знаю а как написать на паскале нет. С меня интересная запись про KDE чтобы не быть халявщиком!	Turbo Pascal В массиве записаны оценки. Определить общее количество четверок и пятерок https://www.cyberforum.ru/ turbo-pascal/ thread435845.html В массиве записаны оценки ученика по 10 предметам. Определить общее количество четверок и пятерок.
Turbo Pascal матрицы и массивы https://www.cyberforum.ru/ turbo-pascal/ thread435841.html помогите пожалуйста! Дана целая квадратная матрица n-го порядка. Определить является ли она такой,в которой суммы элементов во всех строках и столбцах одинаковы.	Куплено n папок по x рублей и m пачек бумаги по y рублей. Определите стоимость p всей покупки Turbo Pascal Куплено n папок по x рублей и m пачек бумаги по y рублей. Определите стоимость p всей покупки.
Turbo Pascal в чем ошибка в моделировании? в чем может быть ошибка в листинге, что шар начинает себя так вести? https://www.cyberforum.ru/ turbo-pascal/ thread435836.html	Turbo Pascal Горизонтальное меню на паскале. сделать кнопки из 4 пунктов Мне надо в готовое меню добавить 4 пункта 1) Ввод массива 2) Вывод массива 3) Обработка массива, заменить отрицательные числа на нули 4) Выход Меню и программа обрабатывающая массив есть, а объединить все это не получается. Помогите пожайлуйста Меню program hormenu; https://www.cyberforum.ru/ turbo-pascal/ thread435826.html
Turbo Pascal Дописать к числу цифру k в конец и в начало дано натуральное число n<=99. дописать к нему цифру к в конец и в начало.	Turbo Pascal Найти длинну самого короткого слова и самого длинного слова люди помогите решить! дана строка,содержащая текст. Найти длинну самого короткого слова и самого длинного слова. https://www.cyberforum.ru/ turbo-pascal/ thread435808.html

Puporev

Почетный модератор

64300 / 47595 / 32743

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

Сообщений: 115,181

26.01.2012, 21:38

последовательности - Turbo Pascal - Ответ 2430586

26.01.2012, 21:38. Показов 401. Ответов 3

Метки (Все метки)

Ответ

Pascal

uses crt;
var a,s,k:integer;
begin
clrscr;
writeln('Вводите целые числа, пока сумма не превсит 100:');
s:=0;
k:=0;
repeat
readln(a);
if a mod 2=0 then k:=k+1;
s:=s+a;
until s>100;
write('Количество четных чисел=',k);
readln
end.

Добавлено через 43 секунды

Не по теме:

кот Бегемот, Привет! Синхронно пишем...

Вернуться к обсуждению:
последовательности Turbo Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

26.01.2012, 21:38

Готовые ответы и решения:

В последовательности из n целых чисел все элементы уменьшить на минимальное число последовательности
Помогите, пожалуйста! Разработать и написать алгоритм указанной задачи. В последовательности из...

Верно ли, что отрицательный член в последовательности C встречается раньше, чем в последовательности B
Помогите с задачей плиз я в паскале никакущий Даны натуральное число n, целые числа a1,...,...

Найти: а) первое число в последовательности большее n б) сумму всех чисел в последовательности
Последовательность Фибоначчи образуется так: первый и второй члены последовательности равны 1,...

Даны три числовые последовательности a, b и c. Сформировать две новые последовательности x и y в соответствии со следующим правилом
Даны три числовые последовательности a, b и c. Сформировать две новые последовательности x и y в ...

	26.01.2012, 21:38

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

26.01.2012, 21:38

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

Найти все числа последовательности, которые являются разностью двух других членов этой последовательности
Найти все числа последовательности, которые являются разностью двух других членов этой...

Вычислить сумму тех элементов последовательности, номера которых на единицу больше чем значения элемента последовательности
Дана последовательность из n вещественных чисел. Вычислить сумму тех элементов последовательности,...

Определить сколько членов первой последовательности совпадают с членами второй и удалить эти члены из первой последовательности
Даны 2-е последовательности целых чисел A1,A2,A3...An И B1,B2,B3...Bn. В каждой последовательности...

Найти максимальный элемент последовательности А и минимальный элемент последовательности С
Нужно найти максимальный элемент последовательность А и минимальный элемент последовательности С ...

Наверх