K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

25 tháng 1 2017

program giatriP ;

var P,a,b,c,d:real ;

begin

writeln('nhap a, b, c, d=');

readln(a, b, c, d);

P:=a*a+b*b-(c+d)*(c+d);

writeln('P= ');

readln

end.

15 tháng 11 2021

uses crt;

begin

clrscr;

writeln(10+4*sqr(15-10)/6+4);

readln;

end.

29 tháng 11 2016

var a,b,c: real;

begin

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

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

c:= (a+b)/2;

write('Gia tri cua bieu thuc c=(a+b)/2 la: ',c);

end.

(chạy thử ct đi ^^!)

11 tháng 11 2021

Câu 2: 

uses crt;

var x,y:int64;

begin

clrscr;

readln(x,y);

writeln(x+y);

readln;

end.

18 tháng 10 2018

a)\(15\) \(mod\) \(8\)

b)\(12\) \(div\) \(7\)

c)\((a+b)*(a+b)*(d+c)*(d+c)*(d+c)\)

d)\((25+b)*(25+b)*(25+b)*(25+b)*(25+b)*(25+b)\)

1 tháng 11 2021

giúp mk đi các bạn

mk xin đấy

2 tháng 11 2021

Câu 1:

b, 15*(4+30+12)

c, (a+b)^2*(d+e)^3

d, a*x^2+b*x+2*c

25 tháng 10 2016

Câu 1 :

a) (a+b)*(a+b)*(d+e)

b) a*x*x+b*x*x+c*x

Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?

Câu 3:

Uses crt;

Var S,a,b:real;

Begin

clrscr;

Writeln('Nhap chieu dai a = '); Readln(a);

Writeln('Nhap chieu rong b = '); Readln(b);

S := a*b;

Write('Dien tich hinh chu nhat la ', S );

Readln;

End.

25 tháng 10 2016

xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal

 

13 tháng 3 2023

Program HOC24;

var a,b: integer;

D: longint;

begin

write('Nhap a: '); readln(a);

write('Nhap b: '); readln(b);

D:=2*(a+b);

write('D = ',D);

readln

end.

18 tháng 10 2021

Bài 1:

-Kiểu dữ liệu phù hợp là kiểu số thực (real)

Bài 2:

a) a*x*x*x+b*x*x+c*x+d

b) 1/(1+x)*(1+x)-2/(x*x+1)

Bài 3: (Lười quá, nhường bạn khác nhé :D)