Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 29.10.2009, 17:02   #1
Betman
 
Регистрация: 26.10.2009
Сообщений: 8
Сообщение проблема с выводом информацыи

вот тут проблема с выводом пишет что writeln нельзя использовать
помогите плз

Код:
program Project2;

{$APPTYPE CONSOLE}
uses
  SysUtils;

type
  Sydno=record
  dovshina:integer;
  shirina:integer;
  osadka:integer;
  kilkist_pasashiriv:integer;
end;
  sydn=array[1..4] of sydno;
const
  a:sydn=((dovshina:15; shirina:50; osadka:1; kilkist_pasashiriv:46),
          (dovshina:30; shirina:200; osadka:1; kilkist_pasashiriv:342),
          (dovshina:20; shirina:50; osadka:2; kilkist_pasashiriv:34),
          (dovshina:20; shirina:50; osadka:2; kilkist_pasashiriv:34));

var
  i:integer;
begin//main
 for i:=1 to 4 do
  begin
   if ((a[i].dovshina)/(a[i].osadka))>=2.5 then
    begin
     writeln('dovshina ', a[i].dovshina:6:2);
     writeln('shirina ', a[i].shirina:6:2);
     writeln('osadka ', a[i].osadka:6:2);
     writeln('kilkist_pasashiriv ', a[i].kilkist_pasashiriv:6:2);
    end;

  end;
 writeln('press enter for exit');
 readln;
end.

Последний раз редактировалось Stilet; 29.10.2009 в 17:04.
Betman вне форума Ответить с цитированием
Старый 29.10.2009, 17:06   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Не нельзя использовать а "нельзя использовать с такими параметрами"
Смотри:
Код:
     writeln('dovshina ', a[i].dovshina:6);
     writeln('shirina ', a[i].shirina:6);
     writeln('osadka ', a[i].osadka:6);
     writeln('kilkist_pasashiriv ', a[i].kilkist_pasashiriv:6);
У тебя же эти поля типа integer а ты форматируешь их как вещественные.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 29.10.2009, 17:09   #3
Betman
 
Регистрация: 26.10.2009
Сообщений: 8
По умолчанию

Спасибо большое.

Последний раз редактировалось Betman; 29.10.2009 в 17:22.
Betman вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проблема с вводом/выводом revan-8 Общие вопросы C/C++ 10 09.07.2009 20:54
проблема с выводом результата Nyutka PHP 2 16.04.2009 11:58
Проблема с выводом текста limon PHP 6 30.11.2008 20:03
Проблема с выводом строки kezman Общие вопросы C/C++ 1 30.08.2008 20:41