Question

viết chương trình nhập 3 số a b c vào từ bàn phím ghi vào tệp

dòng thứ nhất ghi 3 số a b c 

dòng thứ 2 ghi số lớn nhất của 3 số

Answer 1

uses crt;

const fi='max.out'

var f1:text;

a,b,c,max:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f1,max);

close(f1);

readln;

end.