|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
17.11.2010, 10:12 | #11 | |
Форумчанин
Регистрация: 09.06.2010
Сообщений: 112
|
Цитата:
Моя программа: Program MyProg; Var a,i:integer; Begin Writeln('Vvedite peremennuy a'); Readln(a); for i:=a to 50 do writeln(i,'^3 = ', i*i*i); Readln; End. Потом в саму программу ввожу а, например, 45, он мне делает столбик от 45 до 50, но третьи степени этих чисел вычисляет неправильно! Пересчитывал на калькуляторе. А некоторые вообще почему-то отрицательными делает. |
|
17.11.2010, 10:18 | #12 |
Форумчанин
Регистрация: 12.05.2010
Сообщений: 125
|
Странно, попробуй добавить ещё одну переменную (для вычисления степени), а потом выводить её???
|
17.11.2010, 10:19 | #13 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
17.11.2010, 10:22 | #14 |
Форумчанин
Регистрация: 09.06.2010
Сообщений: 112
|
|
17.11.2010, 10:25 | #15 |
Форумчанин
Регистрация: 12.05.2010
Сообщений: 125
|
Дело не в типе 50 в 3 степени 125000- вполне помещается в диапозон!
|
17.11.2010, 10:26 | #16 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
17.11.2010, 10:29 | #17 | |
Форумчанин
Регистрация: 09.06.2010
Сообщений: 112
|
Цитата:
|
|
17.11.2010, 10:29 | #18 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
Для Паскаля не подойдет - integer 2 байта всего
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
20.11.2010, 21:31 | #19 |
Форумчанин
Регистрация: 09.06.2010
Сообщений: 112
|
Люди, тут вот такая возня: я показал преподу решения, она прицепилась, что решено с циклом For. Оказывается, надо было через While или Repeat. Поможете?)))))
Вот задания: 1) Напечатать столбиком третьи степени всех чисел от а до 50 (значение а вводится с клавиатуры; а < 50). 2) Составить программу для расчета факториала натурального числа n (факториал числа n равен 1*2*3*…*n) 3) Распечатать в столбик таблицу умножения на число n (число n вводится с клавиатуры; 1 < n < 9) 4) Составить программу возведения натурального числа в квадрат, учитывая следующую закономерность: 1^2 = 1 2^2 = 1+3 3^2 = 1+3+5 4^2 = 1+3+5+7 …………………………………. N^2 = 1+3+5+7+9+…+2n-1 Заранее спасибо!!! |
20.11.2010, 21:59 | #20 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Несколько задачек (Pascal) | anz2034 | Помощь студентам | 9 | 22.10.2009 16:28 |
Решите пожалуйста несколько задачек!!! Очень надо!!! | Ленусик1990 | Помощь студентам | 2 | 25.06.2009 20:20 |
еще несколько задачек | zayai | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 11.01.2009 14:51 |
Несколько простых задачек | RuZ | Помощь студентам | 1 | 11.02.2008 22:48 |
Несколько простых задачек на tp | cL1zMa | Помощь студентам | 6 | 02.05.2007 07:42 |