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.

26 tháng 5

when green flag clicked

ask "Nhập chiều cao (m):" and wait

set [height v] to (answer)

ask "Nhập cân nặng (kg):" and wait

set [weight v] to (answer)

set [BMI v] to (weight) / ((height) * (height))

say (join "Chỉ số BMI của bạn là " (BMI))

if <(BMI) < (18.5)> then

  say "Bạn đang gầy, hãy tăng cân!"

else

  if <(BMI) < (24.9)> then

    say "Bạn có cân nặng bình thường, hãy duy trì!"

  else

    if <(BMI) < (29.9)> then

      say "Bạn bị thừa cân, hãy giảm cân!"

    else

      say "Bạn bị béo phì, hãy giảm cân!"

    end

  end

end

Giups mình vớiViết chương trình thực hiện các chức năng sau:Dùng bàn phím máy tính để nhập các thông tin của 1 bộ thông tin gồm có Họ tên học sinh, Điểm Văn, Điểm Toán, Điểm Ngoại ngữ. Mỗi khi nhập xong 1 bộ thông tin sẽ hiển thị thông báo nhập nữa hay không, nếu nhấn phím ‘Y’ nghĩa là nhập tiếp bộ thông tin khác, nếu nhấn phím ‘N’ nghĩa là ngừng nhập. Các thông tin nhập được sẽ ghi vào tập tin DATA.INP...
Đọc tiếp

Giups mình với

Viết chương trình thực hiện các chức năng sau:

Dùng bàn phím máy tính để nhập các thông tin của 1 bộ thông tin gồm có Họ tên học sinh, Điểm Văn, Điểm Toán, Điểm Ngoại ngữ. Mỗi khi nhập xong 1 bộ thông tin sẽ hiển thị thông báo nhập nữa hay không, nếu nhấn phím ‘Y’ nghĩa là nhập tiếp bộ thông tin khác, nếu nhấn phím ‘N’ nghĩa là ngừng nhập. Các thông tin nhập được sẽ ghi vào tập tin DATA.INP (mỗi thông tin nằm trên 1 dòng).

Đọc dữ liệu từ tập tin DATA.INP (có cấu trúc giống như tập tin đã tạo ở câu a) và in lên màn hình các dòng thông tin đọc được và in lên màn hình tổng số lượng bộ thông tin có trong tập tin DATA.INP.

Đọc dữ liệu từ tập tin DATA.INP (có cấu trúc giống như tập tin đã tạo ở câu a) và sắp xếp các bộ thông tin theo thông tin điểm trung bình của 3 môn Văn, Toán, Anh theo thứ tự giảm dần. Ghi các bộ thông tin sau khi sắp xếp thành các dòng trong tập tin BANGDIEM.OUT theo nguyên tắc các thông tin cách nhau khoảng cách, điểm trung bình in ra đầu tiên có 2 chữ số thập phân, rồi tới điểm Văn, Toán, Ngoại ngữ (cũng có 2 chữ số thập phân), cuối cùng là Họ tên học sinh.

Đọc dữ liệu từ tập tin DATA.INP (có cấu trúc giống như tập tin đã tạo ở câu a) và tách tối đa 10 bộ thông tin có điểm trung bình tính từ lớn đến nhỏ ra tập tin TOPTEN.DAT, sắp xếp các bộ thông tin dựa theo Họ tên học sinh theo thứ tự bảng chữ cái trước khi ghi vào tập tin.Pascal

0
28 tháng 4 2023

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

i,n,d,max:integer;

begin

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

for i:=1 to n do

begin

write('Nhap phan tu thu ',i,' = ');readln(a[i]);

if a[i] mod 2 <> 0 then d:=d+1;

end;

max:=a[1];

for i:=2 to n do

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

writeln('Co ',d,' so le');

write('So lon nhat la ',max);

readln

end.

Chọn D

21 tháng 12 2023

nhanh với nha

 

21 tháng 12 2023

A

viết chương trình pascal Hoán vị ký tự theo khóa - Tên chương trình GRCAE.??? Nhập vào xâu S chỉ chứa các ký tự là chỉ cái in thường và khoảng trắng. Cho trước khóa m là một hoán vị của n số (2<n<18). Để mã hóa một xâu ký tự ta có thể chia xâu thành từng nhóm từ trái sang phải mỗi nhóm có n ký tự; nếu nhóm cuối không đủ n ký tự thì ta có thể thêm các ký tự trắng vào sau cho đủ. Sau đó hoán vị các ký tự trong...
Đọc tiếp

viết chương trình pascal Hoán vị ký tự theo khóa - Tên chương trình GRCAE.???

Nhập vào xâu S chỉ chứa các ký tự là chỉ cái in thường và khoảng trắng.

Cho trước khóa m là một hoán vị của n số (2<n<18). Để mã hóa một xâu ký tự ta có thể chia xâu thành từng nhóm từ trái sang phải mỗi nhóm có n ký tự; nếu nhóm cuối không đủ n ký tự thì ta có thể thêm các ký tự trắng vào sau cho đủ. Sau đó hoán vị các ký tự trong từng nhóm theo khóa, ghép các nhóm xâu lại theo thứ tự ta được một xâu đã mã hóa. Hãy viết chương trình mã hóa một xâu kí tự cho trước.

Ví dụ: Với n=8 và khóa m=87345621, thực mã hóa xâu S = “hello every body” như sau:

Tách xâu S thành các xâu mỗi xâu có 8 ký tự:

S1 = “hello ev”; S2 = “ery o body”

Thực hiện mã hóa xâu S1, S2 theo khóa m ta được S1’ và S2’:

S1’ = “vello eh”; S2’ =”ydy bore”

Input: GRCAE.INP

· Dòng 1: số nguyên n (2<n<18) và m (m là số nguyên có n chữ số).

· Dòng 2: ghi xâu cần mã hóa (độ dài xâu <=10^5).

Ouput: GRCAE.OUT

· Mỗi dòng ghi 1 xâu có n ký tự đã được mã hóa.

Ví dụ:

GRCAE.INP GRCAE.OUT

8 87345621

hello every body vello eh ydy bore

0
3 tháng 7 2021

Bạn tham khảo ở nguồn này nha.

Tham khảo code chương trình nhập vào ngày tháng năm - programming - Dạy Nhau Học (daynhauhoc.com)

4 tháng 7 2021

copy

#include <bits/stdc++.h>

using namespace std;

long long a,b;

char st;

int main()

{

cin>>a>>b;

cout<<"Nhap phep tinh:"; cin>>st;

if (st=='+') cout<<a+b;

if (st=='-') cout<<a-b;

if (st=='*') cout<<a*b;

if (st=='/') cout<<a/b;

return 0;

}

23 tháng 1 2022

minh tap lap trinh pascal ma du sao cung cam mon ban da co long tot

Viết chương trình nhập 1 mảng số nguyên dương gồm n phần tửa, in ra màn hình mảng vừa nhập (bỏ qua phần này!)b, nhập số nguyên dương k. tính tổng các số trong mảng LỚN hơn k.c, tìm kiếm các cặp 2 phần tử liên tiếp có tổng chia hết cho 10. in ra màn hình các cặp số và vị trí của nó!.d, tìm phần tử lớn nhất và số nguyên dương lớn nhất không xuất hiện trong mảng nhưng nhỏ hơn phần tử lớn nhất trong...
Đọc tiếp

Viết chương trình nhập 1 mảng số nguyên dương gồm n phần tử
a, in ra màn hình mảng vừa nhập (bỏ qua phần này!)
b, nhập số nguyên dương k. tính tổng các số trong mảng LỚN hơn k.
c, tìm kiếm các cặp 2 phần tử liên tiếp có tổng chia hết cho 10. in ra màn hình các cặp số và vị trí của nó!.
d, tìm phần tử lớn nhất và số nguyên dương lớn nhất không xuất hiện trong mảng nhưng nhỏ hơn phần tử lớn nhất trong mảng.
e, tìm số xuất hiện nhiều nhất(lặp lại lắm nhất) và số lần xuất hiện của số đó trong mảng.( Nếu tìm được nhiều số có số lần xuất hiện bằng nhau thì chỉ cần in ra số tìm được đầu tiên ).

f, đếm xem trong mảng có bao nhiêu số thân thiện :)) ( Số thân thiện là số có nhiều hơn 1 chữ số và nó chia hết cho TỔNG các chữ số của nó).


                ----------làm bằng procedure và function giúp mình kaka------------

<3 Cảm ơn các procoder :))

0