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.

31 tháng 12 2016

program P;

var x, y, P: integer;

begin

writeln('nhap x va y = ');

readln(x,y);

P:=x*x+y*y+x*y;

writeln('gia tri bieu thuc = ',P);

readln

end.

Bạn thử chạy chương trình xem có được ko rồi nói lại cho mình nhé.

9 tháng 2 2017

Mik

ko biết

12 tháng 5 2021

Câu 2:

Program nii;

Uses crt;

Var a,b,c,A:integer;

Begin

Write ('nhap a');

Readln (a);

Write ('nhap b');

Readln (b);

Write ('nhap c');

Readln (c);

A:=a;

If A<b then A:=b;

If A<c then A:=c;

Write ('Ket qua',A);

Readln;

End.

12 tháng 5 2021

Câu 1

Program ntg;

Uses crt;

Var A,x,y:integer;

Begin

Write ('nhap x');

Readln (x);

Write ('nhap y');

Readln ('y');

A:=x+y;

Write ('Ket qua',A);

Readln;

End.

 

16 tháng 3 2022

Progam trung_binh_cong

uses crt;

var a,b,c:real;

begin

clrscr

write(nhap so a,b,c=’,)readln(a,b,c)

writeln(‘trung binh cong cua ba so=’,(a+b+c)/3;

readln;

end

 


phuongthao:
Progam trung_binh_cong

uses crt;

var a,b,c:real;

begin

clrscr

write(nhap so a,b,c=’,)readln(a,b,c)

writeln(‘trung binh cong cua ba so=’,(a+b+c)/3;

readln;

end

 


phuongthao:
Progam trung_binh_cong

uses crt;

var a,b,c:real;

begin

clrscr

write(nhap so a,b,c=’,)readln(a,b,c)

writeln(‘trung binh cong cua ba so=’,(a+b+c)/3;

readln;

end

16 tháng 3 2022

ui cj viết TA

16 tháng 3 2022

tham khảo

 

program tinhoc;

uses crt;

var n,dem,tich:integer;

a: array[1..1000] of integer;

begin

clrscr;

writeln('Nhap so phan tu cua day: ');readln(n);

writeln('Nhap ',n,' phan tu cua day: ');

for i:= 1 to n do readln(a[i]);

dem:=0; tich:=1;

for i:= 1 to n do if a[i] mod 2 = 0 then begin dem:=dem+1; tich:=tich*a[i] end;

writeln('Co ',dem,' phan tu chan trong day');

writeln('Tich cua cac so chan trong day la: ',tich);

readln

end.

#include <bits/stdc++.h>

using namespace std;

long long x,n,i,dem;

int main()

{

cin>>n;

dem=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x>0) dem++;

}

cout<<dem;

return 0;

}

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%2==0) t+=i;

cout<<t;

return 0;

}

 

 

#include <bits/stdc++.h>

using namespace std;

long long n,i,t;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

if (i%2!=0) t+=i;

cout<<t;

return 0;

}

 

Câu 1;  Viết chương trình cho phép người dùng nhập 1 số nguyên từ bàn phím, chương trình sẽ cho biết số đó là số chẵn hay lẻ.Câu2. Viết các biểu thức toán sau đây dưới dạng biểu thức trong Pascala)     \(\dfrac{15}{2+3}\)-\(\dfrac{8}{x^3}\)+yb)       \(\dfrac{\left(10+x\right)^2}{3+y}\)-\(\dfrac{18}{5+y}\)Câu 3. Bạn Tuấn viết chương trình như sau:1.  program  Tinh toan2.   uses crt;3.    var4.    x, y : integer;5.    tb = real;6.    thongbao :...
Đọc tiếp

Câu 1;  Viết chương trình cho phép người dùng nhập 1 số nguyên từ bàn phím, chương trình sẽ cho biết số đó là số chẵn hay lẻ.

Câu2. Viết các biểu thức toán sau đây dưới dạng biểu thức trong Pascal

a)     \(\dfrac{15}{2+3}\)-\(\dfrac{8}{x^3}\)+y

b)       \(\dfrac{\left(10+x\right)^2}{3+y}\)-\(\dfrac{18}{5+y}\)

Câu 3. Bạn Tuấn viết chương trình như sau:

1.  program  Tinh toan

2.   uses crt;

3.    var

4.    x, y : integer;

5.    tb = real;

6.    thongbao : integer;

7.    const  a := 2;

8.   begin

9.   clrscr;

10.   thongbao := ‘Trung binh cong cua hai so x va y la: ‘;

11.   write(‘Nhap gai tri cho x = ‘); readln(x);

12.  write(‘Nhap gia tri cho y = ‘); readln(y);

13.      tb = (x+y)/a;

14.   writeln(thongbao, tb:2:1);

15.    readln;

16.         end.

a.  )      Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại cho đúng 

b.    )   Hãy phân biệt tên biến, tên hằng trong chương trình trên 

Câu 4 : Viết chương trình đưa thông báo sau ra màn hình, mỗi thông báo trên một dòng: 

GIÚP MIK VỚI !!!!!!!!!!!!!!!!

 

1
15 tháng 11 2021

1:

#include <bits/stdc++.h>

using namespace std;

long long a;

int main()

{

cin>>a;

if (a%2==0) cout<<"Chan";

else cout<<"Le";

return 0;

}

Câu 1;  Viết chương trình cho phép người dùng nhập 1 số nguyên từ bàn phím, chương trình sẽ cho biết số đó là số chẵn hay lẻ.Câu2. Viết các biểu thức toán sau đây dưới dạng biểu thức trong Pascal a. \(\dfrac{15}{2+3}\) - \(\dfrac{8}{x^3}\) +y                     b.  \(\dfrac{\left(10+x\right)^2}{3+y}\)- \(\dfrac{18}{5+y}\)Câu 3. Bạn Tuấn viết chương trình như sau:1.   program  Tinh toan2  uses crt;3.    var4.  x, y : integer;5. tb =...
Đọc tiếp

Câu 1;  Viết chương trình cho phép người dùng nhập 1 số nguyên từ bàn phím, chương trình sẽ cho biết số đó là số chẵn hay lẻ.

Câu2. Viết các biểu thức toán sau đây dưới dạng biểu thức trong Pascal 

a. \(\dfrac{15}{2+3}\) - \(\dfrac{8}{x^3}\) +y                     b.  \(\dfrac{\left(10+x\right)^2}{3+y}\)\(\dfrac{18}{5+y}\)

Câu 3. Bạn Tuấn viết chương trình như sau:

1.   program  Tinh toan

2  uses crt;

3.    var

4.  x, y : integer;

5. tb = real;

6.  thongbao : integer;

7. const  a := 2;

8.  begin

9.  clrscr;

10.  thongbao := ‘Trung binh cong cua hai so x va y la: ‘;

11. write(‘Nhap gai tri cho x = ‘); readln(x);

12.  write(‘Nhap gia tri cho y = ‘); readln(y);

13.  tb = (x+y)/a;

14.writeln(thongbao, tb:2:1);

15.   readln;

16.  end.

a)  Có một vài câu lệnh bạn Tuấn viết sai, em hãy viết lại cho đúng 

b.  ) Hãy phân biệt tên biến, tên hằng trong chương trình trên 

HELD ME !!!!!!!!!!

 

1
28 tháng 11 2021

Giups mình nhanh vs