Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на языке Pascal


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Pascal

Выпуск № 564
от 04.02.2008, 22:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 249, Экспертов: 50
В номере:Вопросов: 3, Ответов: 5

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 120889: Здраствуйте експерты,у меня детский вопрос :) который неможет ждать :) Вообщем есть программка сортирующая масив,но вот задачка я ввобщу даные в масив целми нормальными числами(1,3,5,...) а когда масив отсортируеться получаю ккакието 000000000Ex ...
Вопрос № 120914: УВАЖАЕМЫЕ ЭКСПЕРТЫ!!!!!!!!!!!!! пожалуста помогите решить в PASCAL задачку, она несложная, но сделать надо уже завтра(((( Используя процедуру ЗАМЕНА ну типа {procedure zamena (a,b:integer); var t:integer; t:=a; a:=b<...
Вопрос № 120925: Нужен код, определяющий, является число "перевёртышем" или нет. "Перевёртыш" - это если все цифры переставить в обратном порядке, то получится то же самое число. З.Ы. У меня Borland Paskal....

Вопрос № 120.889
Здраствуйте експерты,у меня детский вопрос :) который неможет ждать :)
Вообщем есть программка сортирующая масив,но вот задачка я ввобщу даные в масив целми нормальными числами(1,3,5,...) а когда масив отсортируеться получаю ккакието 000000000Ex + 0000 ,как такое исправить?...

Приложение:

Отправлен: 30.01.2008, 18:15
Вопрос задал: Melixion (статус: 1-ый класс)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Зенченко Константин Николаевич
Здравствуйте, Melixion!

Есть два варианта:
1)обьявить массив целых чисел:
var a:array [1..n] of integer;
2)выводить с указанием формата вывода
writeln(a[i]:6:0);
Удачи!
---------
И только наступив на грабли мы приобретаем драгоценный опыт!
Ответ отправил: Зенченко Константин Николаевич (статус: Профессионал)
Украина, Киев
Тел.: +380958380164
Адрес: Украина г.Киев
----
Ответ отправлен: 30.01.2008, 18:30
Оценка за ответ: 5
Комментарий оценки:
Супер! Второй вариант подошел.Если можно прокоментируйте,почему так выходит? что эти магические числа делают ?:)

Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Melixion!
В программе Вы используете массив вещественных чисел, поэтому и выводятся числа в таком виде.
Предлагаю следующие варианты решения:
1. использовать массив целых чисел
2. использовать модуль strings.pas из приложения. В нем находятся функции преобразования строки в число (целое/вещественное) и числа (целого/вещественного) в строку.

Удачи!

Приложение:

Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 30.01.2008, 18:34

Отвечает: sergesus
Здравствуйте, Melixion!
program E17;

{$APPTYPE CONSOLE}

const n=7;
var a:array [1..n] of double;
i,j:integer;
c:double;
begin

for i:=1 to n do
begin
write ('a[',i,']=');
readln(a[i])
end;

for i:=1 to n-1 do
for j:=i+1 to n do

if a[i] > a[j] then
begin
c:=a[i];
a[i]:=a[j];
a[j]:=c
end;

writeln ('uporadkovanuy za zrostannyam masiv ');
for i:=1 to n do
writeln(a[i]:4:3);
readln;
end.

Приложение:

Ответ отправил: sergesus (статус: 2-ой класс)
Ответ отправлен: 30.01.2008, 20:36


Вопрос № 120.914
УВАЖАЕМЫЕ ЭКСПЕРТЫ!!!!!!!!!!!!!
пожалуста помогите решить в PASCAL задачку, она несложная, но сделать надо уже завтра((((

Используя процедуру ЗАМЕНА ну типа

{procedure zamena (a,b:integer);
var t:integer;
t:=a;
a:=b
b:=t; }

поменять местами 4 числа, введенных пользователем и расположить и х в порядке возрастания

ПОЖААЛУСТААААААА!!!!!!!!!!!

Отправлен: 30.01.2008, 20:21
Вопрос задал: ksana09 (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Николай Владимирович / Н.В.
Здравствуйте, ksana09!
Программа в приложении.

Удачи!

Приложение:

Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 30.01.2008, 20:30
Оценка за ответ: 5
Комментарий оценки:
Николай Владимирович! Спасибо Вам огромное, за помощь)))))


Вопрос № 120.925
Нужен код, определяющий, является число "перевёртышем" или нет. "Перевёртыш" - это если все цифры переставить в обратном порядке, то получится то же самое число.
З.Ы. У меня Borland Paskal.
Отправлен: 30.01.2008, 21:23
Вопрос задала: Екатерина Ходеева (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Екатерина Ходеева!
Программа в приложении.

Удачи!

Приложение:

Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 30.01.2008, 21:43
Оценка за ответ: 5
Комментарий оценки:
Спасибо за рабочий и оперативный ответ!
Не знаю, что бы я без вас делала!


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.70 от 17.01.2008
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное