Объясните ошибки в следующих записях на языке паскаль. 1) tan(x*10 > 0) 2)falsevnot(true)-2 3)y=0 and trunc(1/x)mod3=0 or false

1) tan(x*10 > 0) - аргументом функции tan(x) должно быть арифметическое, а не логическое выражение.

2) false v not(true) - 2 - нельзя смешивать в арифметическом выражении логические и числовые данные.

3) y=0 and trunc(1/x) mod 3 = 0 or false - в языке паскаль приоритет операций /, mod, and одинаков и выше, чем приоритет операций =, or и поэтому выражение можно записать так же в виде

y = ((0 and trunc(1/x)) mod 3) = 0 or false, откуда хорошо видно, что 0 and trunc(1/x) некорректное логическое выражение.

  вот первая программа. вторую сейчас пишу.

program p_1; var a,b: string; i,k: integer; begin k: =0; write('введите слово '); readln(a); write('введите символ '); readln(b); for i: =1 to length(a) do begin if a[i]=b then k: =k+1; if a[i]=b then writeln(i,' '); end; if k> =1 then writeln('да, встречается ',k,' раз, на позиции указанных сверху в столбик ')else writeln('нет'); end.

#include < stdio.h>

#include < conio.h>

int main( void )

{

  int c, i;

  printf("input number: ");

  scanf(& c);   //амперсант c в скобках

  i = (int)(c%10);

  c = i*i;

  printf("answer: %i", c);

  getch();

  return 1;

}