Lập trình nhập số quả ổi và khối lượng mối quả. Tính tổng khối lượng. Tính số dư của ổi khi chia 8.
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.


1.
xét a lẻ, b chẵn
thì : a . b . ( a + b ) \(⋮\)2 ( vì có b chẵn )
xét a chẵn, b lẻ
thì : a . b . (a + b ) \(⋮\)2( vì có a chẵn )
xét a chẵn, b chẵn
thì : a . b . ( a + b ) \(⋮\)2 ( vì a,b chẵn )
xét a lẻ, b lẻ
thì : a . b . ( a + b ) \(⋮\)2 ( vì a + b chẵn, tổng của hai số lẻ sẽ thành chẵn )
Vậy với mọi a,b thuộc N thì a . b . ( a + b ) \(⋮\)2

Mình nhớ có bài tương tự, bạn áp dụng vào mà làm nhé

Giải
Cách 1:
Số bi của Hòa là: (18+16) :2 = 17 (hòn)
Tổng số bi của 3 bạn Việt, Nam và Hòa là: 18 + 16 + 17 = 51 (hòn)
2013-05-10_08.31.29_500
Vì Bình có số bi kém trung bình cộng của cả 4 bạn là 6 hòn bi nên trung bình cộng số bi của 4 bạn là:
(51 - 6) : 3 = 15 (hòn)
Số bi của Bình là:
15 - 6 = 9 (hòn)
Cách 2:
Số bi của Hòa là: (18 + 16) : 2 = 17(hòn)
Tổng số bi của 3 bạn Việt, Nam và Hòa là: 18 + 16 + 17 = 51 (hòn)
Coi tổng số bi của cả 4 bạn có dạng là: *6+*6+*6+*6
Thì tổng số bi của 3 bạn Việt, Nam và Hòa là: 6+*6+*6+*6 = 51 (hòn)
Vậy * x 3 + 24=51
* x 3 =51-24
* x 3=27
* = 27:3
* =9
Vậy Bình có 9 hòn bi.
Đáp số: 9 hòn bi

1,5 = \(\frac{3}{2}\)
\(\frac{5}{8}\)Số ổi của bà A là :
20 : ( 3 -2 ) x 2 = 40 ( quả )
\(\frac{3}{5}\)số ổi của bà B là :
20 : ( 3 - 2 ) x 3 = 60 ( quả )
Số ổi của bà B là : 60 : \(\frac{3}{5}\)= 100 ( quả )
Số ổi của bà A là : 40 : \(\frac{5}{8}\)= 64 ( quả )
1,5 = 3/2
5/8 số ổi của bà A là :
20:{3-2}x 2=40 quả
3/5 số ổi của bà B là :
20 : { 3-2 } x =60 quả
số ổi của bà B là : 60 : 3/5 = 100 quả
số ổi của bà A là : 40 : 5/8 = 64 quả

Loại to giá : 100:2= 50 (đ);
Loại nhỏ giá: 100:3= 100/3 (đồng)
TB một quả giá: (50+100/3): 2= 125/3 (đồng)
Giá bán của Bờm là: 200: 5= 40 (đ)
Như vậy mỗi quả đã Bờm bán hụt đi: 125/3-40= 5/3 (đồng)
Số quả là: 500:5/3= 300 (quả)
Program soquaoi;
Uses Crt;
Var a,b: Integer;
TKL, KL: Real;
Begin Clrscr;
write('so oi =' ) Readln ( a);
write ( ' khoi luong='); Readln(KL);
TKL:= a*KL;
b:=a mod 8;
writeln('tong khoi luong=',TKL);
write (' so du cho 8=', b);
Readln;
End.
Theo phần mềm Free Pascal IDE thì sẽ viết như sau:
program khoiluong;
uses crt;
var a,b,tongkhoiluong,sodu:integer;
begin
clrscr;
writeln('Hay nhap so qua oi);readln(a);
writeln('Hay khoi luong oi');readln(b);
tongkhoiluong:=a*b;
sodu:=a mod 8;
writeln('tong khoi luong ',tongkhoiluong);
writeln('So oi du sau khi chia cho 8 la',sodu);
readln;
end.
CHÚC BẠN HỌC TỐT!!!!!!!!!!!!