viết chương trình in lịch lên màn hình trong pascal
Những câu hỏi liên quan
1 tháng 7 2023 lúc 23:10
viết chương trình máy tính nhập 10 số tự nhiên bất kì và in lên màn hình bằng chương trình pascal
(đơn giản thôi nhé mn :''> )
cảm ơn ạ !
var i, so: integer;
begin
writeln('Nhap vao 10 so tu nhien:');
for i := 1 to 10 do
begin
write('So thu ', i, ': ');
readln(so);
writeln('So vua nhap la: ', so);
end;
readln;
end.
Đúng 4
Bình luận (0)
20 tháng 2 2022 lúc 15:45
Viết chương trình Pascal để nhập vào một số tự nhiên n. In lên màn hình tổng các số chẵn từ 1 đến n. Mn giúp mình với!
uses crt;
var i,n:integer;
begin
clrscr;
write('n='); readln(n);
writeln('cac so chan trong khoang tu 1 toi ',n,' la:');
for i:=1 to n do
if i mod 2=0 then write(i:4);
readln;
end.
Đúng 0
Bình luận (1)
program chan;
uses crt;
var i,n:integer;
begin
clrscr;
write('nhap n:');readln(n);
for i:=1 to n do
if i mod 2=0 then write('cac so chan tu 1 den n la:');
readln
end.
Đúng 0
Bình luận (1)
uses crt;
var i,n:integer;
begin
clrscr;
write('n='); readln(n);
writeln('cac so chan trong khoang tu 1 toi ',n,' la:');
for i:=1 to n do
if i mod 2=0 then write(i:4);
readln;
end.
nha bạn
|~ Hok tốt ~|
Đúng 0
Bình luận (2)
Viết chương trình in trên màn hình 5 chữ o chạy trong vòng 5 giây. (Ở phần mềm Pascal)
Viết chương trình pascal cho phép người dùng nhập vào 1 số nguyên, hãy in ra màn hình bảng cửu chương đó
Program HOC24;
var n,i: integer;
begin
write('Nhap so nguyen: '); readln(n);
for i:=1 to 10 do
writeln(n,' x ',i,' = ',n*i);
readln
end.
Đúng 0
Bình luận (0)
uses crt;
var n,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to 10 do
writeln(n,'*',i,'=',n*i);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình pascal thực hiện các công việc sau:
Nhập một thứ trong tuần
In ra màn hình nghĩ tiếng Anh của thứ vừa nhập
Xem chi tiết
uses crt;
var thu:integer;
begin
clrscr;
repeat
write('Nhap thu:'); readln(thu);
until (2<=thu) and (thu<=8);
case thu of
2: writeln('Monday');
3: writeln('Tuesday');
4: writeln('Wednesday');
5: writeln('Thursday');
6: writeln('Friday');
7: writeln('Saturday');
8: writeln('Sunday');
end;
readln;
end.
Đúng 1
Bình luận (0)
Viết chương trình pascal in ra màn hình kết quả thông tin cá nhân của học sinh. Mỗi thông trên một dòng Gợi ý: sử writeln() để in ra màn hình
6 tháng 4 2023 lúc 21:34
Viết chương trình pascal nhập vào 2 số nguyên a, b và in ra màn hình tổng của chúng
Program HOC24;
var a,b: integer;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
write('Tong la: ',a+b);
readln
end.
Đúng 1
Bình luận (0)
Viết một chương trình pascal có sử dụng các câu lệnh : khai báo biến , nhập giá trị của biến , in lên màn hình giá trị của biến , gán giá trị cho biến , câu lệnh điều kiện dạng đủ
uses crt;
var n,x:integer;
begin
clrscr;
write('Nhap n='); readln(n);
writeln('n=',n);
x:=n;
if x mod 2=0 then writeln(x,' la so chan')
else writeln(x,' la so le');
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình in ra màn hình các dòng chữ "Xin chao cac ban" và "Moi ban den voi Pascal
uses crt;
begin
writeln('Xin chao cac ban');
writeln('Moi ban den voi Pascal');
readln;
end.
Đúng 1
Bình luận (0)