Меню

Ошибка разбора как типа данных integer

Не удалось проанализировать атрибут ИдЛицензии

  • 1 Программа Retail Declaration более не поддерживается.
  • 2
  • 3 Для работы с ЕГАИС рекомендуем использовать Контур.Маркет.
  • 4 1 способ
  • 5 2 способ

Программа Retail Declaration более не поддерживается.

Для работы с ЕГАИС рекомендуем использовать Контур.Маркет.

Если при проверке декларации возникает ошибка Строка №88: Ошибка разбора »» как типа данных int. Не удалось проанализировать атрибут «ИдЛицензии» со значением «»,
значит в ТТН не указана лицензия поставщика алкогольной продукции.

Для устранения ошибки воспользуйтесь одним из способом:

1 способ

  1. Перейдите в раздел Справочники/Организации и там с помощью Поиска найдите поставщика АП.
  2. Перейдите на вкладку Лицензии. Нажмите Добавить 
  3. Добавьте лицензию с видом деятельности Закупка, хранение и поставки алкогольной и спиртосодержащей продукции
    Если лицензия уже есть, то измените в лицензии вид деятельности на Закупка, хранение и поставки алкогольной и спиртосодержащей продукции.
  4. В разделе Подразделения нажмите Редактировать.
  5. В открывшемся окне в классификаторе укажите Оптовое звено и выберете лицензию, которая будет использоваться по умолчанию.
  6. Перейдите в раздел Движение продукции/Журнал документов
  7. Укажите квартал, за который вы проверяете декларацию.
  8. В столбце Лицензия контрагента нажмите левой кнопкой мыши на значок с якорем. Поставьте галочку у поставщика в поле Пустые.
  9. В столбце Подразделение контрагента нажмите левой кнопкой мыши на значок с якорем. Поставьте галочку у поставщиков крепкого алкоголя. 
  10. Отобразятся документы поступления, в которых присутствует крепкий алкоголь и не указана лицензия поставщика.
  11. Откройте документы и укажите лицензию поставщика с видом деятельности Закупка, хранение и поставки алкогольной и спиртосодержащей продукции.

2 способ

  1. Перейдите в раздел Декларирование/Приложение 11. Откроется печатная форма декларации по 11 форме. Найдите строки, в которых столбец Серия, номер лицензии пустой. Запомните ИНН-КПП поставщика, номер и дату ТТН, по которым не указана лицензия.
  2. Перейдите в раздел Справочники/Организации и там с помощью Поиска найдите этого контрагента.
  3. Перейдите на вкладку Лицензии. Нажмите Добавить
  4. Добавьте лицензию с видом деятельности Закупка, хранение и поставки алкогольной и спиртосодержащей продукции 
    Если лицензия уже есть, то измените в лицензии вид деятельности на Закупка, хранение и поставки алкогольной и спиртосодержащей продукции.
  5. В разделе Подразделения нажмите Редактировать.
  6. В открывшемся окне в классификаторе укажите Оптовое звено и выберете лицензию, которая будет использоваться по умолчанию.
  7. Перейдите в раздел Движение продукции/Журнал документов и нажмите Поиск. В открывшемся окне укажите номер ТТН. Откройте ТТН.
  8. В ТТН выберете лицензию поставщика с видом деятельности Закупка, хранение и поставки алкогольной и спиртосодержащей продукции.

Вы определились с выбором?

Перейти к оформлению заказа

  • Новичок

    • Регистрация: 05.07.2006
    • Сообщений: 149
    • Спасибо: 0

    Ошибка при тестироваии 4-фсс

    13.04.2012, 09:34

    УСНО от 12.04. При тестировании 4-фсс в протоколе проверки написано следующее.

    Протокол проверки отчета ФСС4

    Версия формата : 04

    Отчетный год : 2012

    Отчетный период : 03

    Ошибка проверки Ошибка разбора »» как типа данных integer. Не удалось проанализировать атрибут «KPS_NUM» со значением «».

    Метки:

    Нет



    • Спасибо



      0

  • Новичок

    • Регистрация: 30.10.2007
    • Сообщений: 4011
    • Спасибо: 27

    УСНО от 12.04. При тестировании 4-фсс в протоколе проверки написано следующее.

    Протокол проверки отчета ФСС4

    Версия формата : 04

    Отчетный год : 2012

    Отчетный период : 03

    Ошибка проверки Ошибка разбора »» как типа данных integer. Не удалось проанализировать атрибут «KPS_NUM» со значением «».

    Integer — целое число
    «» (пробел) — символьное данное.
    атрибут должен быть «0»

    Элементарно,



    • Спасибо



      0

    Комментарий

  • lubezniy

    • Регистрация: 01.02.2007
    • Сообщений: 3914
    • Спасибо: 88

    А KPS_NUM согласно 19-му приказу — это код подчинённости.



    • Спасибо



      0

    Комментарий

  • Игорь И.

    Сотрудник БухСофт.ру

    • Регистрация: 24.03.2010
    • Сообщений: 744
    • Спасибо: 7

    «Ошибка разбора KPS_NUM» — не заполнен код подчиненности на титульном листе.



    • Спасибо



      0

    Комментарий

  • Местный

    • Регистрация: 16.01.2008
    • Сообщений: 169
    • Спасибо: 2

    [QUOTE=v_i_b;2123443]Integer — целое число
    «» (пробел) — символьное данное.
    атрибут должен быть «0»

    Вставляю 0
    И вот что пишет:
    Протокол проверки отчета ФСС4
    Версия формата : 04
    Отчетный год : 2012
    Отчетный период : 03

    Ошибка проверки «0» нарушает ограничение pattern для «d{4}[1,2,3]». Не удалось проанализировать атрибут «KPS_NUM» со значением «0».



    • Спасибо



      0

    Комментарий

  • lubezniy

    • Регистрация: 01.02.2007
    • Сообщений: 3914
    • Спасибо: 88

    Опять же — код подчинённости. Только в этот раз не пробелы, а 0.



    • Спасибо



      0

    Комментарий

  • Новичок

    • Регистрация: 30.10.2007
    • Сообщений: 4011
    • Спасибо: 27

    УСНО от 12.04. При тестировании 4-фсс в протоколе проверки написано следующее.

    Протокол проверки отчета ФСС4

    Версия формата : 04

    Отчетный год : 2012

    Отчетный период : 03

    Ошибка проверки Ошибка разбора »» как типа данных integer. Не удалось проанализировать атрибут «KPS_NUM» со значением «».

    Нужен переводчик с пацанского(программисткого) на общечеловеческий.



    • Спасибо



      0

    Комментарий

Заполнение отчетного периода в Расчете по ФСС

пользователь

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

Если при заполнении Расчета по ФСС оставить незаполненными два поля после Отчетного периода 06 / , то программа автоматически подставляет в эти поля — -.
Проверочные программы (бухсофт и такском) пишут на это:
«Ошибка разбора »—» как типа данных integer.Не удалось проанализировать атрибут «NumDot» со значением «—«.
и
«Выявлены ошибки:
Файл не соответствует схеме. Элемент: ‘Титул’ параметр ‘Титульный лист. Номер обращения за дотацией’ значение ‘—‘ некорректно. Данный параметр должен быть целым числом длиной до 2 знаков.
Выявлены предупреждения:
Титульный лист. Номер обращения за дотацией должен быть числом из двух знаков: 01, 02, 03 и т.д.»

Если же перед сохранением на МН вручную убрать эти черточки, то проверка проходит без ошибок.

  • 92 просмотра

Форум

 

Кто-нибудь выгружал отчетность для ФСС в электронном виде? По-моему даже имя файла неправильно. Что делать? CHECKXML выдаёт ошибку!

 

Юлия Астахова

User

Сообщений: 528
Регистрация: 27.11.2007

Москва, ООО «БЭСТ-Программы»

Здравствуйте!

CHECKXML от какой даты? Какое имя файла получает при выгрузке? Какую ошибку выдает?

Заполнен ли код ФСС в НастройкаОбщие данныеКарточка предприятияЗакладка Коды

Пожалуйста, по вопросам к программе БЭСТ-5,пользуйтесь персональной горячей линией «ВАШ ВОПРОС» на всех страницах сайта.

 

код фсс заполнен, CHECKXML от 1 июля 2010, ошибка:

В первых 10 символах не цифра

11 символ не подчеркивание

Не правильно указан год отчетности

16 символ не подчеркивание

Не правильно указан период отчетности

Ошибка разбора »» как типа данных integer.

Не удалось проанализировать атрибут «WRO» со значением » «.

» » нарушает ограничение enumeration для «041 051 061 071».

Не удалось проанализировать атрибут «TaxType» со значением » «.

» » нарушает ограничение enumeration для «011 021 032».

Не удалось проанализировать атрибут «TaxType» со значением » «.

Имя файла: PFR-700-Y-2010-ORG—DCK-00001-DPT-000000-DCK-00000.XML, в нем почему-то не фигурирует код фсс

 

ORG—DCK вот между этими дефисами и должен быть код. У Вас или справочник не заполнен или при запросе код не указали.

 

переименовала файл — ошибки те же, в кодах всё указано, а в файле нет ни инн, ничего

 

Юлия Астахова

User

Сообщений: 528
Регистрация: 27.11.2007

Москва, ООО «БЭСТ-Программы»

Здравствуйте!

Имя файла имеет вид Рег.номерФСС_год_квартал.xml (квартал в формате 3 — для I кв., 6 — для II кв., 9 — для III кв., 0 — для IV кв.)

Например, xml-файл расчета страхователя с реестровым номером 1000170384 за II-й квартал 2010 года должен называться 1000170384_2010_6.xml.

Пожалуйста, по вопросам к программе БЭСТ-5,пользуйтесь персональной горячей линией «ВАШ ВОПРОС» на всех страницах сайта.

 

я-то понимаю как должно называться, почему бэст не выгружает как надо? что теперь 21 предприятие мне вручную переименовывать? и содержание файла тоже

 

Владимир Устькачкинцев

User

Сообщений: 143
Регистрация: 25.02.2010

Пермь, ЗАО «УралСофт»

#8

06.07.2010 09:55:16

Цитата
Змея Скарапея пишет:

я-то понимаю как должно называться, почему бэст не выгружает как надо?

А у нас имя файла формируется корректно, как в 1-м квартале, так и сейчас… Наверное, у Вас другая форма подцеплена в пункте «сопоставление кодов форм».

Изменено: Владимир Устькачкинцев06.07.2010 09:56:42

 

у нас прикреплено всё правильно, только форма у меня самодельная, если выгружать стандартную, тоже правильно выгружается. Надо мне найти где это подправить

 

Денис

User

Сообщений: 3170
Регистрация: 08.11.2007

Красноярск

 

Змея Скарапея

User

Сообщений: 229
Регистрация: 04.12.2007

Казань

#11

06.07.2010 14:20:50

Хоть из зарплаты, хоть из внешней отчетности — всё равно

 

Microsoft SQL Server 2008 (SP1), getting an unexpected ‘Conversion failed’ error.

Not quite sure how to describe this problem, so below is a simple example. The CTE extracts the numeric portion of certain IDs using a search condition to ensure a numeric portion actually exists. The CTE is then used to find the lowest unused sequence number (kind of):

CREATE TABLE IDs (ID CHAR(3) NOT NULL UNIQUE);

INSERT INTO IDs (ID) VALUES ('A01'), ('A02'), ('A04'), ('ERR');

WITH ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

The error is, ‘Conversion failed when converting the varchar value ‘RR’ to data type int.’

I can’t understand why the value ID = 'ERR' should be being considered for conversion because the predicate ID LIKE 'A[0-9][0-9]' should have removed the invalid row from the resultset.

When the base table is substituted with an equivalent CTE the problem goes away i.e.

WITH IDs (ID)
AS
(
 SELECT 'A01'
 UNION ALL 
 SELECT 'A02'
 UNION ALL 
 SELECT 'A04'
 UNION ALL 
 SELECT 'ERR' 
),
ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

Why would a base table cause this error? Is this a known issue?


UPDATE @sgmoore: no, doing the filtering in one CTE and the casting in another CTE still results in the same error e.g.

WITH FilteredIDs (ID)
AS 
(
 SELECT ID
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'

), 
ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM FilteredIDs 
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

Microsoft SQL Server 2008 (SP1), getting an unexpected ‘Conversion failed’ error.

Not quite sure how to describe this problem, so below is a simple example. The CTE extracts the numeric portion of certain IDs using a search condition to ensure a numeric portion actually exists. The CTE is then used to find the lowest unused sequence number (kind of):

CREATE TABLE IDs (ID CHAR(3) NOT NULL UNIQUE);

INSERT INTO IDs (ID) VALUES ('A01'), ('A02'), ('A04'), ('ERR');

WITH ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

The error is, ‘Conversion failed when converting the varchar value ‘RR’ to data type int.’

I can’t understand why the value ID = 'ERR' should be being considered for conversion because the predicate ID LIKE 'A[0-9][0-9]' should have removed the invalid row from the resultset.

When the base table is substituted with an equivalent CTE the problem goes away i.e.

WITH IDs (ID)
AS
(
 SELECT 'A01'
 UNION ALL 
 SELECT 'A02'
 UNION ALL 
 SELECT 'A04'
 UNION ALL 
 SELECT 'ERR' 
),
ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

Why would a base table cause this error? Is this a known issue?


UPDATE @sgmoore: no, doing the filtering in one CTE and the casting in another CTE still results in the same error e.g.

WITH FilteredIDs (ID)
AS 
(
 SELECT ID
   FROM IDs 
  WHERE ID LIKE 'A[0-9][0-9]'

), 
ValidIDs (ID, seq)
AS 
(
 SELECT ID, CAST(RIGHT(ID, 2) AS INTEGER)
   FROM FilteredIDs 
)
SELECT MIN(V1.seq) + 1 AS next_seq
  FROM ValidIDs AS V1
 WHERE NOT EXISTS (
                   SELECT * 
                     FROM ValidIDs AS V2
                    WHERE V2.seq = V1.seq + 1
                  );

#asp.net #sql

#asp.net #sql

Вопрос:

Ниже приведен мой код хранимой процедуры SQL. Пожалуйста, обратите внимание, что это торговый сайт. Когда я отправляю товары и предоставляю скидку на общую сумму (например, 2467-5% = 2345,65 — возвращаемое значение), а затем нажимаю перейти к оплате, я получаю эту ошибку : Error converting data type nvarchar to int .

 Line 211: int result = _com.ExecuteNonQuery(); 
 

Вот мой код:

 create proc [dbo].[usp_ins_and_update_other_cart_details]
    @Guestid varchar(max),
    @DisAmount int,
    @ShipAmount  int,
    @SubTotal int,
    @GrandAmount int
    as 
begin
    if not exists(select Guestid FROM DiscountAndShippingdetails WHERE Guestid =@Guestid)
    begin
        insert into DiscountAndShippingdetails 
              ( Guestid, DisAmount, ShipAmount, SubTotal, GrandAmount ) 
        values(@Guestid,@DisAmount,@ShipAmount,@SubTotal,@GrandAmount);
    end
    else
    begin
        update DiscountAndShippingdetails 
           set DisAmount   = @DisAmount
             , ShipAmount  = @ShipAmount
             , SubTotal    = @SubTotal
             , GrandAmount = @GrandAmount 
         where Guestid     = @Guestid;
    end
end
 

Комментарии:

1. Вам также придется опубликовать свой SQL-запрос.

2. Что это?. Вы должны показать свои усилия. Здесь мы не знаем, что вы назначили для nvarchar и int. Даже мы не знаем, с чего начать с вашего вопроса?

3. Проблема не здесь. Проблема заключается в вашем SQL-запросе. Включите данные varchar и nvarchar в одинарные кавычки.

4. является ли 2345,65 промежуточным итогом или общей суммой?. Если это так, то ваша процедура может быть неправильной. Вы должны изменить тип данных, иначе вам придется преобразовать свои значения в int, а затем попытаться вставить в базу данных.

5. ПОСЛЕ ПРЕДОСТАВЛЕНИЯ СКИДКИ 2345,65 — ЭТО БОЛЬШАЯ СУММА, Я ПЫТАЮСЬ ОКРУГЛИТЬ ЭТО ЗНАЧЕНИЕ, НАПРИМЕР, 2345,65 РАВНО 2346 ЕСТЬ ЛИ КАКОЙ-НИБУДЬ СПОСОБ ОКРУГЛИТЬ ЭТО ДЕСЯТИЧНОЕ ЗНАЧЕНИЕ, ПОЖАЛУЙСТА, ПОМОГИТЕ

Ответ №1:

Основная ошибка заключается только в одном: вы объявили тип данных как один, а отправляете свои данные как какой-то другой. Смотрите, вы объявили как int для всех столбцов, но отправляете значения в виде строки. Это основная причина вашей борьбы. Пожалуйста, следуйте приведенным ниже строкам для вашего следующего шага,

Измените свое объявление следующим образом,

 int subtotal = Convert.ToInt32( Math.Round(Convert.Todouble(lblsubtotal.Text)));
int discount = Convert.ToInt32(Math.Round(Convert.Todouble(lbldiscount.Text))); 
int shipping = Convert.ToInt32(Math.Round(Convert.Todouble(lblScharg.Text))); 
int gradtotal =Convert.ToInt32( Math.Round(Convert.Todouble(lblGrandTotal.Text))); 
int ret= insertOtherdetails(guiid, discount, shipping, subtotal, gradtotal); 
if (ret != 0) 
{ 
   Response.Redirect("~/Checkout.aspx");
} 
 

и измените определение вашей функции следующим образом: insertOtherdetails(string, int, int, int, int)

Комментарии:

1. промежуточный итог строки = lblsubtotal.Text. toString(); строка discount = lbldiscount.Text. toString(); доставка строки = lblScharg.Text. toString(); строка gradtotal = lblGrandTotal.Text. toString(); int ret= insertOtherdetails(guiid, скидка, доставка, промежуточный итог, gradtotal); if (ret != 0) { Ответ. Redirect(«~/Checkout.aspx»); } общий итог — это ярлык asp с именем gradtotal у нас есть четыре промежуточных итога, скидка , доставка, gradtotal

2. уважаемый, теперь я получаю это сообщение об ошибке компилятора: CS1502: наилучшее соответствие перегруженного метода для ‘Cart.insertOtherdetails (string, string, string, string, string, string)’ имеет некоторые недопустимые аргументы Источник ошибки: Строка 384: int shipping = Convert. ToInt32(lblScharg.Text); Строка 385: int gradtotal = Преобразовать. ToInt32(lblGrandTotal.Text); Строка 386: int ret = insertOtherdetails(идентификатор guiid, скидка, доставка, промежуточный итог, gradtotal); Строка 387: если (ret != 0) Строка 388: {

3. Также измените определение вашей функции. если вы обнаружите что-либо подобное в своей части кодирования insertOtherdetails(строка, строка, строка, строка, строка, строка), пожалуйста, измените следующим образом insertOtherdetails(int, int, int, int, int, int)

4. Наилучшее соответствие перегруженного метода для ‘Cart.insertOtherdetails(int, int, int, int, int, int, int)’ имеет некоторые недопустимые аргументы источник ошибки: Строка 386: int ret = insertOtherdetails(идентификатор guiid, скидка, доставка, промежуточный итог, gradtotal);

5. частная строка disCount(двойная ставка) { возврат (Двойной. Синтаксический анализ(lblsubtotal.Text. toString().Trim()) * (скорость / 100)). toString(); } вместо изменения общего итога есть ли какой-либо способ изменить это десятичное значение dicount, чтобы округлить его

Ответ №2:

прежде всего, вам нужно проверить, что ваша строка не является пустой или нулевой, а затем преобразовать ее в целое число.

Если вы хотите преобразовать nvarchar в целое число из c # asp.net используйте следующее:

преобразовать.toint32(yourstringvalue);

и если вы сделаете это из sql-запроса, выполните следующее:

ПРИВЕДЕНИЕ(yourvalue КАК INT)

=============== как вы изменили свой пост. Сначала проверьте, что ваша хранимая процедура возвращает int / string, а затем напишите

результат int = Преобразовать.ToInt32(executequery());

Комментарии:

1. пожалуйста, взгляните выше

2. вам нужно добавить один выходной параметр «@ClientID INT OUTPUT», а затем после операции вставки / обновления установить этот параметр: ВЫБЕРИТЕ @ClientID = SCOPE_IDENTITY()

3. я все еще не понимаю твою точку зрения, бриджеш, есть ли какой-нибудь способ принять или отказаться принимать десятичное значение

Priveeetkakdela

0 / 0 / 0

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

Сообщений: 10

1

Ошибка типа данных

18.04.2017, 18:10. Показов 2416. Ответов 4

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


Добрый вечер! Такое задание: Ввести с клавиатуры название фигуры, которую надо построить: телевизор или круг. Нарисовать и раскрасить соответствующую фигуру на белом фоне. Использовать оператор условия.
В строке 10 выдает ошибку «Нельзя преобразовать тип integer к System.Drawing.Color». Не могу никак понять, в чем дело.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Uses GraphABC;
var
a:string[10];
begin
writeln('Введите фигуру');
readln(a);
if (a='телевизор') then begin
Rectangle (100,100,600,600);
rectangle(200,200,500,500);
floodfill (100,150,1);
floodfill (100,150,7);
circle(30,650,50);
circle(570,650,50);
floodfill (30,650,0);
floodfill (570,650,0);
setcolor(0);
line (200,100,30,10);
line (400,100,570,10); end
else if (a='круг') then begin 
circle (200,200,100);
floodfill(200,200,14);
end;
end.

__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь



0



Puporev

Почетный модератор

64270 / 47569 / 32739

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

Сообщений: 115,182

18.04.2017, 18:29

2

А не нужно пытаться запускать код написанный для Турбо Паскаля в АВС. Цвета имеют константы типа clWhite, clYellow, clBlue, clGray и т.д.
setcolor->setpencolor.

Добавлено через 2 минуты
И если у Вас правильные фигуры, то выкиньте floodfill, a используйте

Pascal
1
2
setbrushcolor(clYellow);
circle(x,y,r);



0



Priveeetkakdela

0 / 0 / 0

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

Сообщений: 10

18.04.2017, 18:56

 [ТС]

3

Не понимает команду, сразу в 8 строке ошибка «Неизвестное имя ‘clcream'»

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Uses GraphABC;
var
a:string[10];
begin
writeln('Введите фигуру');
readln(a);
if (a='телевизор') then begin
setpencolor(clcream);
setpenwidth(2);
Rectangle (100,100,600,600);
setbrushcolor (clBlack);
rectangle(200,200,500,500);
circle(30,650,50);
circle(570,650,50);
line (200,100,30,10);
line (400,100,570,10); end
else if (a='круг') then begin 
setpencolor (clgreen);
setpenwidth(2);
circle (200,200,100);
end;
end.



0



Почетный модератор

64270 / 47569 / 32739

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

Сообщений: 115,182

18.04.2017, 19:23

4

Лучший ответ Сообщение было отмечено Priveeetkakdela как решение

Решение

Код взяли в Турбо Паскале, тему создали в разделе АВС, а пишете в АВС.net, короче сплошная тупость. Нет в АВС.net цветовой константы clCream, откройте справку и найдите про цветовые константы, их там море.



1



0 / 0 / 0

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

Сообщений: 10

18.04.2017, 19:30

 [ТС]

5

спасибо



0



0 0 голоса
Рейтинг статьи
Подписаться
Уведомить о
guest

0 комментариев
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии

А вот еще интересные материалы:

  • Яшка сломя голову остановился исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного где ошибка
  • Ошибка разбора данных сбой разбора пакета android
  • Ошибка разбора xml фатальная ошибка entityref expecting