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.

22 tháng 4 2021

Ai giúp mình giải bài này với ạgianroi

3; 6; 9; 12; 15; 18; 21; 24; 27; 30; 33; 36;  39; 42; 45; ... ; 120; 123.

Số số hạng:

(123 - 3) : 3 + 1 = 41 số

Số hạng thứ 15 là 45 và 45 \(⋮\) 5

 

uses crt;

var a:array[1..15]of integer;

n:integer;

begin

clrscr;

n:=1;

a[1]:=3;

repeat

  n:=n+2;

a[n]:=a[n-1]+3;

until a[n]>40;

for i:=1 to n-1 do

  write(a[i]:4);

readln;

end.

22 tháng 4 2021

mình thật sự không hiểu j cả

23 tháng 3 2019
https://i.imgur.com/EGQW4jf.jpg
26 tháng 3 2019

Này bạn ơi mình dùng MSWLOGO mà

15 tháng 12 2022

D

15 tháng 12 2022

Đáp án: D

26 tháng 7 2020

Cái đó người ta gọi là toán-tin. Kiểu giải toán bằng các lệnh trên máy tính.

NKDIVSEQ - Dãy chia hết Dữ liệu vào: standard input Dữ liệu ra: standard output Giới hạn thời gian: 1.0 giây Giới hạn bộ nhớ: 128 megabyte Đăng bởi: admin HP xây dựng một dãy số vô hạn A từ dãy các số nguyên dương bằng cách lần lượt xét các số tự nhiên bắt đầu từ 1 và lần lượt chọn các số cho dãy A theo quy tắc: Chọn một số chia hết cho 1 (hiển nhiên là số 1), sau đó là hai số chia hết cho 2,...
Đọc tiếp
NKDIVSEQ - Dãy chia hết Dữ liệu vào: standard input Dữ liệu ra: standard output Giới hạn thời gian: 1.0 giây Giới hạn bộ nhớ: 128 megabyte Đăng bởi: admin

HP xây dựng một dãy số vô hạn A từ dãy các số nguyên dương bằng cách lần lượt xét các số tự nhiên bắt đầu từ 1 và lần lượt chọn các số cho dãy A theo quy tắc: Chọn một số chia hết cho 1 (hiển nhiên là số 1), sau đó là hai số chia hết cho 2, tiếp theo là 3 số chia hết cho 3, 4 số chia hết cho 4, 5 số chia hết cho 5…. Như vậy các số đầu tiên của dãy A là: 1, 2, 4, 6, 9, 12, 16, 20, 24, 28, 30, 35, 40, 45, 50, 54, …..

Yêu cầu: Cho số tự nhiên N, hãy xác định số thứ N của dãy số như trên?

Dữ liệu vào

- Chứa duy nhất số N (1≤ N ≤107).

Kết quả

- Ghi ra số thứ N tìm được.

Ví dụ

Input

10

Output

28

1
https://i.imgur.com/tqeuHgI.png
13 tháng 12 2018

Trên Scratch đây nhé bạn:

Dãy Fibonacci trên Scratch

16 tháng 5 2023

Var n,sc,sl,i:longint;

Begin

Write('N = ');readln(n);

Write('Cac so tu 1 den ',n,' la ');

For i:=1 to n do

Write(i:8);

Writeln;

For i:=1 to n do

Begin

If i mod 2 = 0 then sc:=sc+i

Else sl:=sl+i;

End;

Writeln('Tong cac so chan la ',sc);

Write('Tong cac so le la ',sl);

Readln

End.