Tin học Viết chương trình.

[Eke1312]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

(Giải giùm mình với)Viết chương trình nhập từ bàn phím 3 số nguyên a,b,c :
- Tính bình phương của tổng 3 số a,b,c.
- Tính tổng các số lẻ trong 3 số a,b,c
Yêu cầu mỗi kết quả ghi trên 1 dòng

 

[TTree]

Đây nha bạn:
var a,b,c,t:longint;
begin
readln(a,b,c);
writeln(sqr(a+b+c));
t:=0;
if a mod 2= 1 then t:=t+a;
if b mod 2= 1 then t:=t+b;
if c mod 2= 1 then t:=t+c;
writeln(t);
readln;
end.