Cho mk hỏi thế này là sao ạ. (hình bên dưới ạ)

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.

Chọn lớp

Chọn môn

Mua vip

Nguyễn Cao Bảo Hà

27 tháng 10 2018

Cho mk hỏi thế này là sao ạ. (hình bên dưới ạ)

#Tin học lớp 8

Nguyễn Cao Bảo Hà

27 tháng 10 2018

Lập trình đơn giản

Đúng(0)

Các câu hỏi dưới đây có thể giống với câu hỏi trên

Ko no name

6 tháng 8 2021

Ai có thể giúp mình hỏi cái này là bị sao với ạ mình mới học lớp 8 nên ko biết nó bị sao cả

#Tin học lớp 8

htfziang

6 tháng 8 2021

ấn restart

chắc là máy bị tắt ko đúng cách hoặc lỗi kĩ thuật nào đó

bn cứ thử restart lại xem đc k

Đúng(2)

Buddy

6 tháng 8 2021

theo mình như vầy là đập nhé !

Đúng(2)

Trần Ngọc Hảo

28 tháng 12 2020

giải đề này cho mk vs ạ

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

28 tháng 12 2020

Câu 1:

uses crt;

var t:real;

i:integer;

begin

clrscr;

t:=0;

for i:=1 to 100 do

t:=t+(sqr(i) mod (2*i));

writeln('So tien sau cung la: ',t:0:0);

readln;

end.

Câu 2:

const fi='dxau.inp';

fo='dxau.out';

var f1,f2:text;

st:string;

x:char;

dem,i,d:integer;

a:array[1..255]of integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,st);

readln(f1,x);

d:=length(st);

dem:=0;

for i:=1 to d do

if st[i]=x then

begin

inc(dem);

a[dem]:=i;

end;

if dem=0 then writeln(f2,'Khong co')

else begin

writeln(f2,dem);

for i:=1 to dem do

write(f2,a[i]:4);

end;

close(f1);

close(f2);

end.

Đúng(1)

Cheriiiiihehe

28 tháng 4 2022

Viết chương trình nhập vào mảng a gồm n phần tử thuộc kiểu số nguyên, yêu cầu: - In ra màn hình các phần tử trong mảng - In ra màn hình số lượng các phần tử là số chẵn hoặc số lẻ. Mn ơi lm ơn giúp mk bài này vs ạ!!! Mk sắp thi ròi!!!

#Tin học lớp 8

Kaito Kid

28 tháng 4 2022

bạn tham khảo

uses crt;

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

i,n,t:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

t:=0;

for i:=1 to n do

if a[i] mod 2=0 then t:=t+a[i];

writeln(t);

readln;

end.

Đúng(2)

Cheriiiiihehe

28 tháng 4 2022

Mk cảm ơn bạn

Đúng(0)

HT.Phong (9A5)

CTVHS

24 tháng 4 2023

Cho em hỏi bài này lỗi chỗ nào ạ

#Tin học lớp 8

Tống hiền chi

14 tháng 4 2022

Giúp mk bài này với ạ

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

14 tháng 4 2022

uses crt;

var a:array[1..42] of real;

i,n,dem:integer;

nn:real;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

nn:=a[1];

for i:=1 to n do

if nn>a[i] then nn:=a[i];

for i:=1 to n do

if nn=a[i] then write(i:4);

writeln;

dem:=0;

for i:=1 to n do

if a[i]>=8 then inc(dem);

writeln(dem);

readln;

end.

Đúng(1)

ミ★ċɦαŋɦ★彡

14 tháng 4 2022

em chịu ạ

Đúng(0)

Sushi

28 tháng 10 2023

Đặc điểm chính của máy tính từng thế hệ? Ai làm nhanh mk tick cho ạ.

#Tin học lớp 8

Hồ Nguyên

25 tháng 3 2022

Cho mình hỏi đáp án bài này bằng bao nhiêu ạ ?
a=10,b=5
Khi a>=5 thì a=a-2, còn b=b+a
Vậy b =? bạn nào giải thích kĩ giúp ạ

#Tin học lớp 8

Phạm Thị Như Hoa

5 tháng 4 2022

Cho mình hỏi là : Cách nhập và in ra màn hình các phần tử của biến mảng .

Cảm ơn nhiều ạ !

#Tin học lớp 8

Nguyễn Lê Phước Thịnh

5 tháng 4 2022

Nhập:

For i:=1 to n do readln(a[i]);

Xuất:

for i:=1 to n do write(a[i]:4);

Đúng(0)

Trúc chó

18 tháng 4 2020

Các bn ơi...lại là mk😂 giải giúp mk nha!....tại đến cuối HK1 mk ms đc hx tin vì phòng máy phải sữa chữa...nên nhìu bài mk ko thể thực hành nên ko bt làm....Mn giúp mk vs ạ!Bài mk gửi dưới comment ạ!

Cảm ơn mn nhìu ạ!

#Tin học lớp 8

Minh Lệ

19 tháng 4 2020

Trúc chó : Đúng nhé.

Đúng(0)

Minh Lệ

18 tháng 4 2020

Bài 2:

Program hotrotinhoc;

var i: byte;

begin

write('5 so tu nhien dau tien la : ');

for i:=0 to 4 do write(i,' ');

readln

end.

Bài 3:

Program hotrotinhoc;

var n,i: integer;

s: real;

begin

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

i:=0;

while i<n do

begin

inc(i);

s:=s+1/i;

end;

write('S=',s:1:2);

readln

end.

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP