![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Задача на Pascal'e
Всем доброго времени суток! Как многие знают, скоро у студентов начинается сессия, поэтому пришло время сдавать задолжности. Так вот у меня возникла огромная проблема с сдачей работы по программированию на Borland Pascal. Дело в том, что я никак не могу сделать два задания. Так что взываю о помощи, вот задания :
1)Вывести на экран таблицу первых N степеней числа А. 2)Распечатать произведеие чисел А и В, изменяющихся от 11 и -25 с шагом -3 и 5 соответсвенно до тех пор, пока это произведение отрицательное число. Вот...необходимо написать программный код, как бы он выглядил в самом Паскале. Задачи решаются с помощью оператора цикла(FOR)...вот только как...Прошу у вас огромной помощи, кому не тяжело помогите. Отредактировано Q, 23.04.2008 в 23:39. |
![]() |
#1
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
FellGuard
Losyash
![]() ![]() offline
Опыт:
39,547Активность: |
» code паскаль я не знаю, вот реализация в си. Впринципе, нетрудно провести параллели между конструкциями.Код:
|
![]() |
#2
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Спасибо конечно, но про С++ я знаю ровно столько, сколько африканские дети о варкрафте. Извини... |
![]() |
#3
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Ну ребят, неужели никто не сечет в паскале? пожалуйста помогите, для меня это очень важно |
![]() |
#4
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
happy_horror
2 + 2 = 22 :-D
![]() offline
Опыт:
7,818Активность: |
Цитата:
сомневаюсь, что секущие в паскале играют в варкрафт ![]() |
|
![]() |
#5
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
adic3x
![]() offline
Опыт:
108,439Активность: |
ну вообще елементарные задачи, т.е. тупо циклы и все |
![]() |
#6
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
J
expert
![]() offline
Опыт:
48,447Активность: |
могу на си++ си# бейсике, или даже на джазе, но на паскале нет...:) |
![]() |
#7
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Эх чует мое сердце придется идти завтра на консультацию :(( |
![]() |
#8
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
J
expert
![]() offline
Опыт:
48,447Активность: |
вот на c# ))
Код:
|
![]() |
#9
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Ужас...если честно для меня это набор циферок и скобочек :) но провести соответствия с паскалем ну никак...не получается. Отредактировано Q, 23.04.2008 в 23:39. |
![]() |
#10
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
J
expert
![]() offline
Опыт:
48,447Активность: |
на джазе
Код:
Jon добавил: брось, уже 3 варианта на языках разных дано, уж както можно провести паралеь с поскалем, я просто поскаль вообще не помню и хз как он выглядит даже примерно... |
![]() |
#11
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
Doberman341
Базару нет...
![]() ![]() offline
Опыт:
831Активность: |
Первая прога:
Код:
Вторая: Код:
Компилятора щас нет, проверить не могу, так что возможны ошибки. |
![]() |
#12
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Ой спасибо тебе большущее, сейчас буду тестить. |
![]() |
#13
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
Doberman341
Базару нет...
![]() ![]() offline
Опыт:
831Активность: |
G_Unit, во фрагменте:
repeat j:=a*b; a:=a-3; b:=b+5; writeln(j+' '); until j>=0; end. надо выделенный фрагмент заменить на j<0 |
![]() |
#14
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
Так начну по порядку : первая задача работает почти как часы, вот только в строчке writeln(a+'^'i'='b' ') выдается ошибка, я ее решил заменить на writeln(b) и все заработало. Я думаю что ошибка кроется где-то в этом ''.т.е в апострофах, ну это ладно, главное все работает. Вторая задача тоже отказалась запускаться в этом месте writeln(j+' ') я ее заменил на writeln(j), программа опять же запустилась, но она выводит произведение один раз, тоесть срабатывает один раз...я думаю тут без цикла все таки не обойтись... |
![]() |
#15
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
DFlyer
<3 MJ
![]() ![]() offline
Опыт:
42,879Активность: |
И всё-таки не j<0, а j>=0.
|
![]() |
#16
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
G_Unit
![]() ![]() offline
Опыт:
314Активность: |
УРА ТОВАРИЩИ! Благодаря действиям Doberman341 и DFlyer'a удалось сделать сложнейшее практическое задание. Благодарю всех, кто откликнулся, спасибо за помощь. |
![]() |
#17
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
Skynex
![]() offline
Опыт:
12,348Активность: |
G_Unit если что надо по паскале спрашивай. помогу чем смогу. паскаль знаю хорошо. даже отл ично.
|
![]() |
#18
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
tysch_tysch
Работаем
![]() ![]()
online
Опыт: отключен
|
открыто по просьбе автора |
![]() |
#19
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|
![]()
Q
![]() offline
Опыт:
360,164Активность: |
Цитата:
В таком случае я думаю проблема не в незнании паскаля, а в отсутствии мозга. Русский язык подучи, пригодится. |
|
![]() |
#20
+0/−0
Профиль |
Приват |
Поиск |
Цитата |
IP: Записан
|