Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Задана окружность и прямая. Определить, пересекаются ли прямая и окружность https://www.cyberforum.ru/ turbo-pascal/ thread616694.html
Задана окружность с центром в точке O(0,0) и радиусом R0, и прямая y = ax+b. Определить, пересекаются ли прямая и окружность. Если пере- секаются, найти точку пересечения.
Определить, пересекаются ли параболы y = ax2+bx+c и y = dx2+mx+n. Если пересекаются, то найти точку пересечения Turbo Pascal
Определить, пересекаются ли параболы y = ax2+bx+c и y = dx2+mx+n. Если пересекаются, то найти точку пересечения
Дан текстовый файл. Распечатайте текст в обратном порядке слов Turbo Pascal
Дан текстовый файл. Распечатайте текст в обратном порядке слов. Эта задача по теме "Динамические структуры данных"
Turbo Pascal Определить, в каком из файлов больше положительных, отрицательных и нулевых даны два файла вещественных чисел определить в каком из них больше положителтных отрицательных и нулевых значений......плизззз https://www.cyberforum.ru/ turbo-pascal/ thread616675.html
Turbo Pascal Написать программу построения графика функции y= lnX – 2 на отрезке [-2;3] https://www.cyberforum.ru/ turbo-pascal/ thread616668.html
Написать программу построения графика функции y= lnX – 2 на отрезке
Генерировать все k-значные числа, не содержащие одинаковых цифр, кратные 2 и 3 Turbo Pascal
Помогите, пожалуйста, составить программу. Или объясните очень подробно как это сделать. Вот задание: Написать программу, которая выполняет задание варианта с помощью генерации всех соответствующих...
Проверить правильность расстановки круглых и квадратных скобок в выражениях Turbo Pascal
2 дана строка символов проверить правильность расстановки круглых и квадратных скобок в выражениях
Turbo Pascal Двунаправленный линейный список строк. Вставить строку, удалить строку и заменить строку 3 двунаправленный линейный список строк.требуется вставить строку после строки с номером и удалить строку с номером и заменить строку с номером и подсчитать стастистику (количество строк и символов)... https://www.cyberforum.ru/ turbo-pascal/ thread616545.html
Turbo Pascal Упорядочить массив так, чтобы сначала иши упорядоченные положительные члены а потом упорядоченные отрицательные члены https://www.cyberforum.ru/ turbo-pascal/ thread616531.html
1 упорядочить одномерный массив таким образом,чтобы сначала ии упорядоченные положительные члены а потом упорядоченные по возрастанию отрицательные члены tarasman, следующее название вроде...
Turbo Pascal Кольцевой список Составила программу, но преподаватель сказал, что -то вроде:"для таких задачек, подобные простыни не составляют"..... Помогите оптимизировать - сделать код компактнее. Задача: нужно в кольцевой... https://www.cyberforum.ru/ turbo-pascal/ thread616523.html
153 / 153 / 81
Регистрация: 16.06.2012
Сообщений: 314
29.06.2012, 22:35 0

Циклы. Напечатать числа в виде таблицы, используя только циклы

29.06.2012, 22:35. Просмотров 1948. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено User233 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
Var n , i , j : integer;
Begin
    ReadLn(n);
    for i := 1 to n do begin
        for j := 1 to i do 
            Write(i,' ');
        Writeln;    
    end;
End.
Добавлено через 1 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
Var n , i , j : integer;
Begin
    ReadLn(n);
    for i := 1 to n do begin
        for j := 1 to n - i do
            Write(' ');
        for j := 1 to i do 
            Write(i,' ');
        Writeln;    
    end;
End.


Вернуться к обсуждению:
Циклы. Напечатать числа в виде таблицы, используя только циклы
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
29.06.2012, 22:35

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Напечатать числа в виде таблицы, используя только циклы
Напечатать числа в виде таблицы, используя только циклы (массивы и строки не применять)...

Напечатать числа в виде таблицы, используя только циклы
41 42 43…50 51 52 53…60 71 72 73…80

Напечатать числа в виде таблицы, используя только циклы
4.4) Напечатать числа в виде таблицы, используя только циклы (массивы и строки не применять): 41...

Напечатать числа в виде таблицы, используя только циклы
4. Организация вывода с использованием вложенных циклов Напечатать числа в виде таблицы, используя...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.