|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
09.10.2012, 18:11 | #1 |
Пользователь
Регистрация: 09.10.2012
Сообщений: 49
|
Программирование с использованием оператора For (Turbo Pascal)
Дано К натуральных чисел.Вывести на экран все нечетные числа.
Дано К чисел.Напечатать квадраты всех отрицательных чисел. Можно что-то одно из двух помочь решить.Два задания не обязательно! БЕЗ МАССИВА! Последний раз редактировалось Dina 85; 09.10.2012 в 18:20. |
09.10.2012, 18:16 | #2 |
Участник клуба
Регистрация: 30.01.2011
Сообщений: 1,578
|
с учетом что хранятся в массиве
1 Код:
Код:
пишу код не только за печеньки
Последний раз редактировалось VIK_aka_TOR; 09.10.2012 в 18:21. Причина: попутал ord c odd ))) |
09.10.2012, 18:17 | #3 | |
Форумчанин
Регистрация: 21.10.2010
Сообщений: 588
|
Цитата:
Код:
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681 |
|
09.10.2012, 18:22 | #4 |
Пользователь
Регистрация: 09.10.2012
Сообщений: 49
|
ИЗВИНИТЕ
Я не указала что без использования массивов (мы эту тему еще не проходили).
|
09.10.2012, 18:55 | #5 |
Форумчанин
Регистрация: 21.10.2010
Сообщений: 588
|
Тогда можно как то так
Код:
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681 |
09.10.2012, 19:02 | #6 |
Пользователь
Регистрация: 09.10.2012
Сообщений: 49
|
|
09.10.2012, 19:10 | #7 | ||
Форумчанин
Регистрация: 21.10.2010
Сообщений: 588
|
Цитата:
Цитата:
Odd - стандартная функция проверки на нечетность. Альтернатива, как уже было сказано, это Код:
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681 |
||
09.10.2012, 19:21 | #8 |
Пользователь
Регистрация: 09.10.2012
Сообщений: 49
|
так как вы написали программа не выполняется.если не знаете то не пишите.
к натуральных чисел ввводится с клавиатуры. |
09.10.2012, 19:29 | #9 | ||
Форумчанин
Регистрация: 21.10.2010
Сообщений: 588
|
Цитата:
Цитата:
Пользователь не знает, чего он хочет, пока не увидит то, что он получил.
Для благодарностей WMR R145235935681 |
||
09.10.2012, 19:30 | #10 |
Пользователь
Регистрация: 09.10.2012
Сообщений: 49
|
Я уже сама поняла как делать
program aaa;
var n,i:integer; begin write('введите количесто элементов последовательности'); readln(n); for i:=1 to n do begin if i mod 2<>0 then writeln(i); end; end. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Программы с использованием условного оператора и оператора выбора. Задачи по Delphi. Не могу сделать 4 программу | Bovi4 | Помощь студентам | 0 | 25.10.2011 20:15 |
(Программирование на языке Turbo Pascal) | formalit | Помощь студентам | 6 | 19.05.2011 10:54 |
Программирование циклов с использованием оператора WHILE | Yuliyanna | Паскаль, Turbo Pascal, PascalABC.NET | 11 | 25.04.2011 02:25 |
Программирование с использованием массивов (Pascal) | F_U_C_K | Помощь студентам | 2 | 14.11.2010 16:19 |
Программирование на алгоритмическом языке Turbo Pascal | Дима82 | Помощь студентам | 28 | 10.05.2008 10:19 |