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.
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.
xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal
a) đúng
b) đúng
c) đúng
d) kết quả phụ thuộc vào biến x
nếu x<=1 thì đúng
ngược lại thì sai
s1= n*(n+1)/2
s2= (s1)^2
S3 ( giải = 500es)
1->M
1->A
0->Y
Y+A/M->Y: A/M->A : M+1->M
Ấn n lần kết quả là Y
bạn có thể viết ct chi tiết cho mình được không
1B 4C
2A 5A
3C 6C
7.
program TBC;
uses crt;
var a,b,tbc:real;
begin
clrscr;
write('nhap so a:');readln(a);
write('nhap so b:');readln(b);
tbc:=(a+b):2;
writeln('tbc cua hai so a va b la:',tbc:6:2);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long s1,s2,s3,s4,i;
int main()
{
s1=0;
for (i=1; i<=100; i++) s1=s1+i*i;
s2=0;
for (i=1; i<=100; i++) if (i%2==1) s2+=i;
s3=0;
for (i=1; i<=100; i++)
{
if (i%2==1) s3+=i*i;
else s3-=i*i;
}
s4=0;
for (i=1; i<=100; i++)
{
if (i%2==1) s4+=i;
else s4-=i;
}
cout<<s1<<" "<<s2<<" "<<s3<<" "<<s4;
return 0;
}
a) sqr(sqr(sqr(x))+3)-2/(sqr(x)*x)+sqr(2x+1)
b) a*x*x*x+3*sqr(a)*x+3*a*sqr(x)+a*x+c
tất cả các câu đều là s:=s+i hay s:=s+1/sqr(i)..vân vân bạn ạ
1.Viết chương trình tính: xa
2.Viết chương trình tính: S=1+2n+3n+....+nn
mong các bạn giúp đỡ.......
Program bai1;
uses crt;
var i,x,a,kq:longint;
Begin
clrscr;
writeln('Chuong trinh tinh X^a');
write('X=');readln(x);
write('a=');readln(a);
kq:=1;
for i:=1 to a do
kq:=kq*x;
writeln(x,'^',a,'=',kq:4);
readln;
end.
bài 2:
Program bai2;
uses crt;
var n,i: integer;
s: real;
begin
clrscr;
write('nhap so n ='); readln(n);
s:=0;
for i:= 1 to n do
s:=s+exp(n*ln(i));
writeln('tong =',s :4:2);
readln;
end.
var a,b,c,d:integer;
begin
write('cac so a,b,c,d lan luot la:');
for a:=1 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
for d:=0 to 9 do
if a*1000+b*100+c*10+d=a*a*a*a+b*b*b*b+c*c*c+d*d*d*d then write(a,',',b,',',c,',',d);
readln
end.
rồi nhé cậu :)
ghê thế
làm đi @@
abcd là thế nào hả chú
Hóng
nhìn lác mắt
đúng r quá xuất sắc
Vc, ghi đề như thế thì mk hiểu là a . b . c . d = a4 + b4 + c3 + d4 và a, b, c, d là các số nguyên dương. Bạn nào lm dc đề này thì làm nhé
xem bạn trên làm hộ đi :)
readln chưa có chấm phẩy kìa bạn
Cần gì dấu chấm phẩy hả bạn
Trịnh Ánh Ngọc
Nguyễn Duy Hải Bằng ko hiểu gì về Pascal lun ak
mình nhớ thầy dạy là sau readln phải có dấu chấm phẩy chứ. nếu ko sẽ báo lỗi.
mình có thi tin học r mà.
readln có thể có dấu ; hoặc không, cô mình bảo thế
tại sao trong pascal readln ở cuối chương trình ko cần dấu ";"? | Yahoo Hỏi & Đáp
Trịnh Ánh Ngọc
Lê Tuấn Nghĩa
thì mình nói vậy thôi
@Tú Nguyễn là abcd=a*b*c*d đó bạn.
Chúc bạn học tốt nha
Bạn nghĩ tớ thấy sai
TIN HỌC THỜI 4.0 NAY ĐC MỌI NGƯỜI QUAN TÂM LẮM NHÉ!Chắc là xung quanh chỗ bạn ko đc mọi người yêu thích thôi chứ trương tớ thì thích tin lắm!