HOC24
Lớp học
Môn học
Chủ đề / Chương
Bài học
Viết CT nhập vào một phân số, kiểm tra xem phân số đó có tối giản hay ko ?
Ai bt thì làm ơn giúp nha <3 <3
Viết CT giải các bài toán sau: S = 1-2+3-4+5-6+7-8+...+n
(Viết cấu trúc câu lệnh While...do)
Viết CT nhập vào một số, kiểm tra xem số đó có phải là số chính phương ko ? (Sử dụng câu lệnh lặp nha mấy bạn.) Ai bt thì cho mình câu hỏi. Cảm ơn nhìu
Ai bít câu trả lời thì cho mình hỏi vs: Viết CT nhập vào 1 số tự nhiên , cho bt số đó có bao nhiêu ước, tính tổng của chúng và các ước của số đó. Ví dụ: ước của 6 là 1 2 3 6, có 4 ước và tổng là 12
program tinh tong ;
Var S,t: integer;
Begin
S:= 0;
For i:= 1 to 100 S:= S + i;
writeln (' tong cac so tu nhien tu 1 den 100');
Readln
End.