Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal Заполнить массив размерность 6 х 6 по правилу: https://www.cyberforum.ru/ turbo-pascal/ thread611089.html Заполнить массив размерность 6 х 6 по правилу: 1 2 3 … n-2 n-1 2 3 4 … n-1 n 3 4 5 … n 0 … … … … … … n-1 n 0 … 0 0 n 0 0 … 0 0	Turbo Pascal Даны два одномерных массива. Элементы, стоящие за минимальным, возвести в квадрат Даны два одномерных массива произвольных чисел. В каждом из них элементы, стоящие за минимальным возвести в квадрат. Преобразованные массивы вывести на печать. Использовать подпрограмму для преобразования массива по указанному прави-лу.
Turbo Pascal Определить, сколько членов последовательности являются квадратами нечетных чисел Дана последовательность N целых чисел a1,a2,...,an. Определить, сколько членов последовательности a1,a2,...,an являются квадратами нечетных чисел. dmitriy2012, следующее название типа "Задача по паскалю" будет вознаграждено карточкой. Уважайте правила форума. Добавлено через 1 час 58 минут okay(( https://www.cyberforum.ru/ turbo-pascal/ thread611060.html	Turbo Pascal Можно ли представить число в виде суммы квадратов двух натуральных чисел https://www.cyberforum.ru/ turbo-pascal/ thread611045.html n - натуральное. Можно ли представить его в виде суммы квадратов двух натуральных чисел? Указать пару натуральных чисел x,y таких, что n=x2+y2.
Turbo Pascal Переполнение program Project1; {$APPTYPE CONSOLE} uses SysUtils; function fib(i:cardinal):cardinal ; begin if (i = 0) then	Turbo Pascal Разработать процедуру для вычисления координат элемента матрицы,который ближе всего к нулю разработать процедуру для вычисления координат элемента матрицы,который ближе всего к нулю. с помощью этой процедуры установить в 0 элемент матрицы А, который ближе всего к 0 https://www.cyberforum.ru/ turbo-pascal/ thread611042.html
Turbo Pascal Переписать положительные элементы матрицы в массив. Найти наибольший элемент Переписать положительные элементы матрицы B(N,M) в одномерный массив С. Найти наибольший элемент массива С и сумму элементов,расположенных за наибольшим. Отпечатать массив С и найденную сумму. https://www.cyberforum.ru/ turbo-pascal/ thread611020.html	Turbo Pascal Дан файл вещественных чисел. Поменять в нем местами минимальный и макси-мальный элементы Дан файл вещественных чисел. Поменять в нем местами минимальный и макси-мальный элементы. Пожалуйста помогите решить.
Turbo Pascal Массив. Отсортируйте отдельно элементы с чётными индексами по возрастанию, и элементы с нечётными индексами по убыванию Организуйте массив содержащий 20 целых чисел. Отсортируйте отдельно элементы с чётными индексами по возрастанию, и элементы с нечётными индексами по убыванию. Прошу помочь решить https://www.cyberforum.ru/ turbo-pascal/ thread611010.html	Turbo Pascal Разработать функцию для вычисления количества цифр Х, входящих в число Y https://www.cyberforum.ru/ turbo-pascal/ thread610997.html разработать функцию для вычисления количества цифр Х. входящих в целое положительное число Y. с помрщью этой функции определить в каком из двух целых положительных чисел А и В больше цифр "3"
Вывести в новый файл слова, начинающиеся на 'а' и заканчиваются на 'я' Turbo Pascal создать текстовый файл, вводя строки с клавиатуры. определить в каждой строке слова, начинающиеся на 'а' и заканчиваются на 'я'. вывести найденные слова в новый текстовый файл. как разделители между словами применять пробелы	Turbo Pascal Найти: 1) сумму компонентов файла F, 2) умножить компоненты файла https://www.cyberforum.ru/ turbo-pascal/ thread610987.html В заданном файле F, компоненты которого - действительные числа найти: 1) сумму компонентов файла F, 2) умножить компоненты файла

КонецСвета

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

7966 / 3937 / 2464

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

Сообщений: 5,377

21.06.2012, 20:59

Напечатать числа в виде таблицы, используя только циклы - Turbo Pascal - Ответ 3194495

21.06.2012, 20:59. Показов 1089. Ответов 1

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

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

Решение

Pascal

var i,j: byte;
begin
for i:=1 to 4 do
    begin
    for j:=1 to 10 do
        write(j,' ');
    writeln;
    end;
readln;
end.

Вернуться к обсуждению:
Напечатать числа в виде таблицы, используя только циклы Turbo Pascal

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

Programming

Эксперт

94731 / 64177 / 26122

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

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

21.06.2012, 20:59

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

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

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

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

	21.06.2012, 20:59

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

21.06.2012, 20:59

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

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

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

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

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

Наверх