Em hãy tạo chương trình Scratch để nhập từ bàn phím số giây X, sau đó thông báo ra màn hình kết quả đổi X thành giờ, phút, giây. Ví dụ: “3678 giây” thì kết quả cần thông báo ra màn hình là “1 giờ 1 phút 18 giây”
Những câu hỏi liên quan
SGK Chân trời sáng tạo - Trang 83
25 tháng 7 2023 lúc 10:09
Tạo chương trình Scratch để nhập hai số m, n từ bàn phím, thực hiện hoán đổi giá trị của hai biến và thông báo giá trị của biến m, n sau khi đã hoán đổi.
Ví dụ, sau khi nhập m = 23, n = 45, chương trình đưa ra kết quả ra màn hình như ở Hình 6.
viết chương trình nhập vào 1 số nguyên dương n từ bàn phím. Hãy cho biết số đó là số chẵn hay số lẻ và thông báo kết quả ra màn hình
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
cin>>n;
if (n%2==0) cout<<"Chan";
else cout<<"Le";
return 0;
}
Đúng 1
Bình luận (0)
SGK Kết nối tri thức với cuộc sống - Trang 79
3 tháng 8 2023 lúc 11:00
Em hãy sử dụng ngôn ngữ lập trình trực quan để viết chương trình tinh chu vi đường tròn, diện tích hình tròn với giá trị của bán kính được nhập vào từ bàn phím, thông báo kết quả ra màn hình.
Bài 1. Viết chương trình nhập vào 1 mảng a gồm n phần tử nguyên được nhập từ bàn phím.
a) Tính tổng các số chẵn và lớn hơn 10? Thông báo kết quả và in mảng ra màn hình?
b) Đếm các số lẻ hoặc nhỏ hơn 100? Thông báo kết quả và in mảng ra màn hình?
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,t,dem;
int main()
{
cin>>n;
dem=0;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0 && x>10) t+=x;
if (x%2!=0 || x<100) dem++;
}
cout<<t<<" "<<dem;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình nhập vào từ bàn phím số nguyên a, sử dụng câu lệnh điều kiện để kiểm tra xem a có nằm trong khoảng từ 1 đến 100 hay ko , thông báo kết quả ra màn hình
giúp em với 2 câu thôi ạ :
viết chương trình nhập vào xâu bất kì từ bàn phím , ghi xâu sau khi loại bỏ các dấu cách ra tệp D:\ketqua.txt
viết chương trình nhập vào từ bàn phím 4 số bất A,B,C. tìm và thông báo kết quả ra màn hình giá trị nhỏ nhất MIN của 4 số đó có sử dụng chương trình con
1:
uses crt;
const fi='ketqua.txt'
var f1:text;
st:string;
i,d:integer;
begin
clrscr;
assign(f1,fi); rewrite(f1);
write('Nhap xau:'); readln(st);
d:=length(st);
for i:=1 to d do
if st[i]=#32 then delete(st,i,1);
writeln(f1,st);
close(f1);
end.
Đúng 0
Bình luận (0)
2:
uses crt;
var a,b,c,d:integer;
{----------chuong-trinh-con-----------------------}
function min(x,y:integer):integer;
begin
if x<y then min:=x
else min:=y;
end;
{---------------chuong-trinh-chinh--------------------}
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
write('d='); readln(d);
writeln(min(a,min(b,min(c,d))));
readln;
end.
Đúng 0
Bình luận (1)
viết chương trình pascal nhập vào đầy đủ n số tự nhiên ( n được nhập từ bàn phím) sử dụng lệnh lặp chưa biết trước số lần lặp để tính tổng các số đó và thông báo kết quả ra màn hìnhIn ra màn hình trung bình của cấc số đã cho ở trên
Xem chi tiết
program tinhtong;
uses crt;
var i, n, s: integer;
begin clrscr;
Write('N so tu nhien dau tien la: ');
readln(n);
s:=0;
i:=1;
while i<=n do begin
s:=s+i;
i:=i+1;
end;
writeln('Tong cac so la: ',s);
readln
end.
Đúng 0
Bình luận (1)
program tinhtong;
uses crt;
var i,n,t:longint;
a:array[1..100]of longint;
begin
clrscr;
write('nhap so n:');readln(n);
for i:=1 to n do
begin
write('nhap phan tu a[',i,']:');readln(a[i]);
end;
t:=0;i:=1;
repeat
t:=t+i;
i:=i+1;
until i=n;
writeln('tong cua ca so tren la:',t);
writeln('trung binh cua cac so tren la:',t/n);
readln;
end.
Đúng 0
Bình luận (0)
uses crt;
var a:array[1..100]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
t:=t+a[i];
writeln('Tong cac so la: ',t);
writeln('Trung binh cong cac so la: ',t/n:4:2);
readln;
end.
Đúng 0
Bình luận (0)
Xem thêm câu trả lời
Viết chương trình nhập vào một xâu S có độ dài không quá 100 ký tự từ bàn phím. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình. Xuất xâu đã nhập
Chương trình:
program bai_10_chuong_4;
uses crt;
var
s: string[100];
i, dem: integer;
Begin
clrscr;
write('Nhap xau vao:'); readln(s); dem:= 0;
for i:= 1 to length(s) do
if ('0'<=s[i]) and(s[i]<=’9') then dem:=dem+l;
Writeln('Trong xau s co '»dem,' chu so thap phan');
readln;
End.
Đúng 2
Bình luận (0)
uses crt;
var st:string;
i,d,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
writeln('Xau vua nhap la: ',st);
dem:=0;
for i:=1 to d do
if st[i] in ['0'..'9'] then inc(dem);
writeln(dem);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập từ bàn phím một xâu kí tự S có độ dài không quá 100. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình ( Trên NNLT Python).