Viết chương trình tính và đưa ra màn hình giá trị của biểu thức: A=15x 2 +4y-2(y-1) (Với x, y là 2 số nguyên được nhập vào từ bàn phím) NHANH NHA MN MÔN TIN

2 câu trả lời

uses crt;

var x,y,A:integer;

begin

write('nhap x:');readln(x);

write('nhap y:');readln(y);

A:=15*2+4*y-2*(y-1);

writeln('A=',A);

readln;

end.

program tinh;

uses crt;

var x, y, a : integer;

begin

clrscr;

write('nhap gia tri x :');readln(x);

write('nhap gia tri y :');readln(y);

a := 15 * x * x + 4 * y - 2 * (y - 1);

writeln('gia tri cua bieu thuc a la :',a);

readln

end.