Pascal (Паскаль)

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

Войти

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

Другие темы раздела
Pascal Проверить, является ли заданный текст определением поля шахматной доски https://www.cyberforum.ru/ pascal/ thread1535793.html Задано текст из двух букв. Проверить, является ли этот текст определением поля шахматной доски (в определении шахматной доски первая буква - латинская буква от А до Н, а вторая - цифра от 1 до 8).	Pascal Протабулировать функцию y = sin (x) на промежутке [0; pi] с шагом 0.1 Задача в паскале немогу решыть 1. Протабулировать функцию y = sin (x) на промежутке с шагом 0.1. Результаты вычислений вывести на экран в виде таблицы. Найти минимальное и максимальное значение функции на этом промежутке. (Команда repead until). 2. Определить среднее арифметическое квадратов нечетных чисел от а до с (значение нечетных чисел а и с задает пользователь, a <c).
Pascal Вывести на экран остаток и неполное частное от деления натуральных чисел A на B Пожалуста срочна нужна сделать Разработать программу, которая находит и выводит на экран монитора остаток и неполное частное от деления натурального числа A на натуральное число B. Числа A и B вводятся с клавиатуры. https://www.cyberforum.ru/ pascal/ thread1535782.html	Pascal Может ли шахматный король попасть с первой клетки на вторую за один ход Поле шахматной доски определяется парой чисел (а,b) каждое от 1 до 8,первое число задает номер столбца,второе - номер строки.заданы 2 клетки.определите,может ли шахматный король попасть с первой клетки на вторую за один ход. https://www.cyberforum.ru/ pascal/ thread1535680.html
Проверить, являются ли числа в файле упорядоченными по возрастанию Pascal Здравствуйте. Задача : Пусть дан файл целых чисел (типизированный). Проверить , являются ли числа в файле упорядоченными по возрастанию. мое : uses crt; type input = integer; var f: file of input ; c, i: integer; n_elements:integer;	Pascal Найти названия предметов, которые ведет преподаватель с фамилией Fam https://www.cyberforum.ru/ pascal/ thread1535597.html Есть вот это : program c; const n=5; type stroka = array of char; dayweek = ( mo, tu, we, th, fr, sa, su); time = record hour: 0..23; min: 0..59; end;
Pascal Найти первый из номеров последовательности чисел для которого выполняется условие. https://www.cyberforum.ru/ pascal/ thread1535561.html Дано число D (> 0). Последовательность чисел AN определяется следующим образом: A1 = 1, A2 = 2, AN = (AN-2+ AN-1)/2, N = 3, 4, ... Найти первый из номеров K, для которых выполняется условие \|AK -AK-1\|<D, и вывести этот номер, а также числа AK-1 и AK.	Составить программу для вычисления значения функции Y при заданном х Pascal Составить программу для вычисления значения функции Y при заданном х . y=sinx+x^3 при x=0.112;
Pascal Вычислить объем правильной четырехугольной пирамиды https://www.cyberforum.ru/ pascal/ thread1535285.html Составить программу для решения задачи . Набрать и наладить эту программу , а также подобрать входные данные. Дано высоту и сторону правильной четырехугольной пирамиды , вычислить ее объем.	Pascal Создать массив, содержащий действительные числа из текстового файла. https://www.cyberforum.ru/ pascal/ thread1535203.html Помогите!!! Очень срочно нужно!!! 4. Дан текстовый файл input.txt, содержащий действительные числа (количество чисел в файле не превышает 1000). Создать массив, содержащий компоненты этого файла. Вывести содержимое массива на экран. Заранее большое спасибо!!!
Протабулировать функцию в паскале на задаными промежутке и с заданым шагом Pascal Как в паскале протабулировать функцию y = sin ( x ) на промежутке с шагом 0,1.Вивесты результат на экран с соответствующим пояснительной текстовой информацией.	Pascal Представить натуральное число в виде суммы простых натуральных чисел Здравствуйте. :) Прошу помощи в написании алгоритма для элементарной задачи.. Заранее спасибо.;) Дано натуральное число N. Представить его в виде суммы простых натуральных чисел так, чтобы произведение этих слагаемых было максимально. Входные данные: В единственной строке входного файла input.txt записано одно натуральное число N. Выходные данные: В единственную строку выходного файла... https://www.cyberforum.ru/ pascal/ thread1535112.html

JokeR.BY

CAPITAL OF ROCK!

1281 / 708 / 982

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

Сообщений: 2,286

22.09.2015, 16:24

Вывести в виде таблицы числа от 50 до 70, их квадраты и кубы с помощью команды while - Pascal - Ответ 8102132

22.09.2015, 16:24. Показов 1221. Ответов 1

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

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

Решение

Pascal

const
    a = 50;
    b = 70;
    line = '----------------------';
var
    i: Byte;
begin
    WriteLn(line);
    WriteLn('|  x |  x2  |   x3   |');
    WriteLn(line);
    i := a;
    while (i <= b) do
    begin
        WriteLn('| ', i:2, ' | ', (i * i):4, ' | ', (i * i * i):6, ' |');
        Inc(i);
    end;
    WriteLn(line);
end.

Вернуться к обсуждению:
Вывести в виде таблицы числа от 50 до 70, их квадраты и кубы с помощью команды while Pascal

Programming

Эксперт

94731 / 64177 / 26122

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

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

22.09.2015, 16:24

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

Ввести 2 числа и вывести квадраты и кубы данных чисел от а до б
ввести 2 числа и вывести квадраты и кубы данных чисел от а до б

Вывести квадраты и кубы 10 чисел
нужно вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, …...

Вывести квадраты и кубы 10 чисел
Вывести квадраты и кубы 10 чисел следующей последовательнсти 1,2,4,7,11,16,22,29,,37,46 ...

Вывести квадраты и кубы чисел от a до b
Ввести a и b с клавиатуры и вывести квадраты и кубы чисел от a до b(нужно использовать цикл)

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

22.09.2015, 16:24

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

Ввести a и b и вывести квадраты и кубы чисел от a до b
Пример: Введите границы интервала: (4 6) 4 16 64 5 25 125 6 36 216 #include...

Ввести a и b и вывести квадраты и кубы чисел от a до b.
Ввести a и b и вывести квадраты и кубы чисел от a до b. Пример: Введите границы интервала:...

Вывести квадраты и кубы 10 чисел следущей последовательности
вывести квадраты и кубы 10 чисел следущей последовательности: 1, 2, 4, 7, 11, 16 …

Вывести квадраты и кубы 10 чисел следующей последовательности
Здравствуйте, помогите пожалуйста) Вывести квадраты и кубы 10 чисел следующей...

Вывести квадраты и кубы 10 чисел следующей последовательности
не используя массивы, только понятия цикла и не пользуясь "step" Вывести квадраты и кубы 10 чисел...

Наверх