LINUX.ORG.RU

[Паскалъ] Need Help


0

1
program eight_b;

uses crt;
var x , y:integer;
var res:boolean; 

BEGIN
   writeln('input two numbers');
	readln(x,y);
	//writeln();
	if x > 20  OR  y > 20 
	then res := true;
	else 
	res := false;
	END.
fpc "untitled.pas" (in directory: .)
Compilation failed.
Free Pascal Compiler version 2.4.2 [2010/11/14] for i386
Copyright (c) 1993-2010 by Florian Klaempfl
Target OS: Linux for i386
Compiling untitled.pas
untitled.pas(26,7) Error: Incompatible types: got "Boolean" expected "LongInt"
untitled.pas(28,2) Fatal: Syntax error, ";" expected but "ELSE" found
Fatal: Compilation aborted
Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)

Что программа должна делать(на пхп)

	<?
	$a = $_POST[a];
	$b = $_POST[b];
	if $a > 20 or $b > 20 then $res = true;
	else $res = false;
	?>


Ответ на: комментарий от eliriand

> перед else там точка с запятой не ставится.

+1.

anonymous
()
Ответ на: комментарий от a931bw

> ругается на другое

Условия в скобки попробуй.

anonymous
()

Перед else ; не ставится.

У readln точно такой синтаксис? (я уже запамятовал)

panter_dsd ★★★★
()

Операции сравнения в скобки возьми.

Nervous ★★★★★
()
Ответ на: комментарий от a931bw

А теперь, дружище, запомни, что вот этот выхлоп

untitled.pas(26,7) Error: Incompatible types: got «Boolean» expected «LongInt»
untitled.pas(28,2) Fatal: Syntax error, ";" expected but «ELSE» found

должен читать ТЫ сам, а не ЛОР!!!

adriano32 ★★★
()

http://www.linux.org.ru/gallery/workplaces/6111315

Свободно говорю на Русском, Литовском, Английском.

Свободно говорю на Английском


Английском



[Паскалъ] Need Help

Error: Incompatible types: got «Boolean» expected «LongInt»


Fatal: Syntax error, ";" expected but «ELSE» found



Школоло поделило на ноль.

anonymous
()
Ответ на: комментарий от anonymous

> Школоло поделило на ноль.

Свободно говорю на Английском

[оооочень толсто]Про чтение там ничего не сказано.[/] :)

anonymous
()

умвр

program shit;
uses crt;
var x, y: integer;
var res: boolean;
begin
    writeln('input two numbers');
    readln(x, y);
    if (x > 10) or (y > 20)
    then begin
       writeln('too big');
       res := true
    end
    else begin
       writeln('fine');
       res := false
    end
end.
% fpc ./shit.pas 
Free Pascal Compiler version 2.4.0 [2011/05/04] for x86_64
Copyright (c) 1993-2009 by Florian Klaempfl
Target OS: Linux for x86-64
Compiling ./shit.pas
shit.pas(4,5) Note: Local variable "res" is assigned but never used
Linking shit
/usr/bin/ld: warning: link.res contains output sections; did you forget -T?
17 lines compiled, 0.1 sec 
1 note(s) issued

% ./shit        
input two numbers
3
5
fine

% ./shit
input two numbers
12
7
too big
anonymous
()

И после этого еще кто-то будет говорить, что паскаль - зло, а пыхпыхеров не надо стерилизовать?

redgremlin ★★★★★
()

зачем тут program, зачем unit подключать, зачем два раза ключевое слово var? Пыхеров надо усыплять, ей богу.

chinarulezzz ★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.