помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end.

Наш друг, Oleg Woronoff написал новый вопрос в UNC Clinic.

 

Вопрос заключается в том: помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end.

помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end.

  Обсуждение и ответы

Пожалуйста, прочитайте обсуждение и ответы на вопросы помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end. ниже. Оставшиеся без ответа вопросы будут в ближайшее время получить обзор и обсуждение других посетителей.

Вы также можете участвовать ответить или ответить на вопрос "помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end.". Не бойтесь делиться, даже если это все-таки не так. В ClassRU.com, мы учимся друг у друга и обеспечивают обратную связь друг с другом.

Предоставляя ответы или ответы на вопросы помогите найти ошибку.pascal program a1; uses crt; var st,s1,s2,x,y,a,b,c,k:byte; begin clrscr; x:=8; y:=6; readln(a,b,c); s1:=y*x; s2:=a*b; k:=s1/s2 st:=k*c; writeln(st); end., Вы помогли Oleg Woronoff получить ответ ему нужно.