Question

информатика! !!СРОЧНО!!ПОМОГИТЕ!!!СПАСИТЕ!!!СОСТАВИТЬ ПРОГРАММУ ПИСЬМЕННО, ЖЕЛАТЕЛЬНО СДЕЛАТЬ И СФОТКАТЬ! !!СРОЧНО!!!

Answer 1

program z1;
var:y,a,c,x:real;
begin
readln(a,c,x);
y:=0;
if xif x>c then y:=a;
if x=c then y := c-a;
writeln (y);
end.

Answer 2

на бэйсике надо!