Giúp về PASCAL LỚP 11

[Della007]

Ai làm
giúp với!kt học kì
VIẾT Chương trình nhập vào 2 số tự nhiên a,b bất kì
a>Đưa ra màn hình tổng 2 số a,b
b>Đưa ra màn hình các số chẵn trog 2 số a,b
c>Đưa ra màn hình kết quả của biểu thức! S=căn a2+b2
Viết từ đoạn program giúp mình nha!thank thank

 

[blog4meblog4me is verified member.]

Ai làm
giúp với!kt học kì
VIẾT Chương trình nhập vào 2 số tự nhiên a,b bất kì
a>Đưa ra màn hình tổng 2 số a,b
b>Đưa ra màn hình các số chẵn trog 2 số a,b
c>Đưa ra màn hình kết quả của biểu thức! S=căn a2+b2
Viết từ đoạn program giúp mình nha!thank thank

cai nay trong sach co huong dan ma.
Hoc qua 3,4nam roi,khong nho ro nua.

 

[xflash]

tu sua loi nhe, lau khong viet roi

program 123;
use crt;
var a,b:byte;
s:longint;
crlscr;
begin
write('nhap so a :'); readln(a);
write('nhap so b :'); readln(b);
s:=a+b;
writeln('tong a,b la',s)
readln;
end.

 

[n2kptd]

Haiz, php thì may ra

 

[HeroHero is verified member.]

Cái này nhớ không nhầm thì bài này của tin học lớp 8 , giờ quên hết sạch, lên 11 phải học lại

 

[KhangSkull]

Gần 1 năm rồi nên không nhớ. a và b thì của lớp 8. c thì chắc 11 em sẽ được học.

 

[KhangSkull]

program bai_tap;
use crt;
var a,b,tong := integer;
begin
clrscr;
writeln ('nhap vao gia tri a= '); readln(a);
writeln ('nhap vao gia tri b= '); readln(b);
tong:=a+b;
writeln ('tong hai so a + b = ', tong);
If a mod 2 then writeln ('a la so chan');
If b mod 2 then writeln ('b la so chan');
end.

----------> Bổ sung bài viết lúc 02:02 PM <----------> Bài viết trước lúc 01:59 PM <----------

Theo em nhớ là như vậy không biết đúng không.

 

[4share]

Viết begin thôi nhé!
Cau c:

Begin
clrsrc;
writeln ('nhap a=');
readln(a);
writeln(nhap b=');
readln(b);
bieuthuc:= sqrt(a*a + b*b);
writeln ('bieu thuc=',bieuthuc);
readln;
end.

Bài này mà không làm đk thỳ xác định đi e.

 

[Favn_tk]

em chua hoc,ms lop 10 haiz

 

[KhangSkull]

Em lp 9 này thím..........