Những câu hỏi liên quan
trần thị anh thư
Xem chi tiết
Trần Minh Hoàng
6 tháng 1 2019 lúc 18:01

Mk chỉ bt lm trên Scratch thui

Bình luận (0)
Trần Thị Diẽm Kiều
6 tháng 1 2019 lúc 19:04

VAR A,n:real;

begin

write('nhap gia tri n:');readln(n);

A:=1/(1*3)+1/(2*4)+1/(3*5)+.........+1/n(n+2);

writeln('gia tri cua A la:,'A);

readln;

end.

Bình luận (2)
Đạt Nguyễn
Xem chi tiết
Trần Ái Linh
25 tháng 5 2021 lúc 9:52

program im_14424;

uses crt;

var A: array[1..100000] of integer;

S,i,n: integer;

begin

clrscr;

write('Nhap vao n: ');

readln(n);

S:=0;

for i:=1 to n do

begin

write('Nhap A[',i,']: ');

readln(A[i]);

if (A[i] mod 2 = 0 then S:=S+i;

end;

write(S);

readln

end.

Bình luận (2)
Ngân
Xem chi tiết
Nguyễn Khắc Mạnh Cường
Xem chi tiết
Nguyễn Khắc Mạnh Cường
Xem chi tiết
hello
15 tháng 5 2023 lúc 22:43

loading...  

- Đầu vào: Giá trị a, giá trị b

- Đầu ra: giá trị tích 

( Ko chắc là đúng )

Bình luận (0)
Nguyễn Khắc Mạnh Cường
Xem chi tiết
Phạm Hồng Ngọc Trân
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 1 2022 lúc 10:19

Input: a,b,c

Output: (a+b+c)/3

Bình luận (1)
Niễn Mạn Kỳ
Xem chi tiết
Nguyễn Lê Phước Thịnh
15 tháng 4 2021 lúc 20:20

uses crt;

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

n,i:integer;

begin

clrscr;

repeat

write('Nhap n='); readln(n);

if n<=0 then writeln('Ban nhap sai, yeu cau nhap lai');

until n>0;

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to n do 

  if a[i] mod 2=0 then write(a[i]:4);

readln;

end.

Bình luận (0)
TruongHuynhLacThien
Xem chi tiết
nhok jem
31 tháng 3 2017 lúc 17:06

tổng dãy số từ 1983-1 á

Bình luận (0)
Lưu Ngọc Oanh
31 tháng 3 2017 lúc 17:16

(so cuoi +so dau )  ×1983 ÷2 =1967136 

nho kb

Bình luận (0)
TruongHuynhLacThien
31 tháng 3 2017 lúc 17:20

ko phải âu ! Mk thử hỏi cô nhưng cô bảo là ko phải!

Bình luận (0)