Задачи на Borland Pascal

[Lerik09]

Задачи не сложные но не понимаю(((
9 класс
Borland Pascal

[russian-stalker]

1:

program Project2;
var
  a,b,c,d:integer;
begin
  read(a,b,c,d);
  if a*b*c*d mod 2=0 then
  writeln('chetnie') else
  writeln('nechetnie');
end.

[russian-stalker]

2:

program Project2;
var
  a,b,c,d:integer;
begin
  read(a,b,c,d);
  if ((a-b)>d) and (a+b+c+d<=80) then
  writeln(c,' ',d) else
  if (a-b)>d then
  writeln(a,' ',b,' ',c,' ',d) else
  if a+b+c+d<=80 then
  writeln(a,' ',b) else
  writeln(a*5,' ',b*5,' ',c*5,' ',d*5);
  readln(a);
end.

[Lerik09]

program Project2;
uses wincrt;
var
  a,b,c,d:integer;
begin
  read(a,b,c,d);
     if (a-b)>d then
  writeln('a,b,c,d') else
if a+b+c+d<=80 then
  writeln('a,b') else
   if ((a-b)>d) and (a+b+c+d<=80) then
  writeln('c,d') else
writeln('a*5,b*5,c*5,d*5');
end.

Составила сама
выдает ответ в буквах(Что тут не верно у меня???
Замечание модератора: Используйте тег [CODE]

[russian-stalker]

сами? а помоему вы взяли мой вариант и переделали под неправильный лад

[Ser@Fim]

Lerik09, выражение стоящее в апострофах (например, 'a,b,c,d') означает строку, то есть он вам и выводит a,b,c и d как символы. Чтобы вывести сами значения этих переменных, надо написать именно так, как указал russian-stalker.
И еще поправочка: в задании указано "увеличив их НА 5", значит

 
//...
writeln(a+5,' ',b+5,' ',c+5,' ',d+5);
//...

[russian-stalker]

Спасибо за поправку, не углядел)