Перейти к содержимому



Купить ссылку здесь
Фотография
- - - - -

Парни, выручайте. Кто шарит за Паскаль

Форум ZiSMO.biz
1
В теме одно сообщение

OFFLINE Отправлено

Vanya Erokhin
группа пользователя

    Уровень 1

  • Cообщений: 25
  • Поинты: 2
  • Предупреждений: 0
  • Онлайн:12ч 1м
0

Карочи, такое дело
надо написать

вводится 2 числа через любой знак и выводится в какой координатной четверти находится эта точка

 

Вот что я написал

var
x, y, i: integer;
a: array[-1000000..1000000] of string;
/// i: char ;
begin
writeln('Введите два числа через пробел');
x := 0;
read(i);
for i := 1 to length(a) do
begin
if (ord(a[i]) >= ord('0')) and (ord(a[i]) <= ord('9'))
then
x := x * 10 + strtoint(a[i]);
end;
if (x > 0) and (y > 0) then write('1');
if (x < 0) and (y > 0) then write('2');
if (x < 0) and (y < 0) then write('3');
if (x > 0) and (y < 0) then write('4');
end.

 

 

 

У меня выдает ошибку Program1.pas(14) : Нет перегруженной подпрограммы с такими типами параметров





    • 0
  • Наверх
  • Ответить

ONLINE Отправлено

_Z_i_K_
группа пользователя

    Premium раскрутка VK/Insta - smm-vtope.ru

  • Cообщений: 38 126
  • Поинты: 27 593
  • Предупреждений: 0
  • Онлайн:267д 18ч 54м
1 977

паскаль abc net ?


00y7s2u.gif18.04.18 qXBSYMu.png14.03.18                 Продажа поинтов ZISMO - zismo.biz/topic/832809
Q1D9HsA.gif28.04.18 xeQJRPH.gif28.04.18                 Продажа поинтов ZISMO - zismo.biz/topic/832809

    • 0
  • Наверх
  • Ответить



Напишите свое сообщение