Viết chương trình pascal đổi giá trị của hai biến x và y
( dùng gán x:=z y:=x z:=y )
Em hãy viết chương trình cho bài toán sau bằng ngôn ngữ Pascal
- Nhập 1 số nguyên K từ bàn phím
- Gán cho biến x giá trị là số dư của phép chia K cho 5
- Gán cho biến y giá trị là phần nguyên của phép chia biến K cho 5
- Hiển thị lên màn hình thông báo "giá trị của K/5=giá trị của y, dư giá trị của x
(VD:Nhập giá trị của K=16.Sẽ hiển thị lên màn hình dòng thông báo "16/5 - 3,dư 1"
uses crt;
var k,x,y:integer;
begin
clrscr;
readln(k);
x:=k mod 5;
y:=k div 5;
writeln(k,'/5=',x,' du ',y);
readln;
end.
Viết các câu lệnh trong pascal theo yêu cầu sau: 1.nhập số nguyên :x 2.Gán bình phương của x vào y 3. Xuất ra giá trị của y 4. Kết thúc chương trình
uses crt;
var x,y:integer;
begin
clrscr;
readln(x);
y:=sqr(x);
writeln(y);
readln;
end.
Viết chương trình Cho hai biến x, y và in ra kết quả sau khi hoán đổi. Viết câu lệnh hoán đổi giá trị của hai biến để x và y.
#include <bits/stdc++.h>
using namespace std;
long long x,y;
int main()
{
cin>>x>>y;
swap(x,y);
cout<<x<<" "<<y;
return 0;
}
Cho biểu thức y = 5 - 2x. Em hãy viết chương trình Pascal tính và in ra màn hình giá trị y. Với x, y là hai biến của chương trình có kiểu dữ liệu là số nguyên, giá trị của x đươc nhập vào từ bàn phím.
giúp em với mng, cảm ơn mng rất nhiều ạ<3
Viết Chương Trình Pascal : a) Khai Báo biến a có kiểu dữ liệu số thực và có giá trị là 20,5 , biến b có kiểu dữ liệu xâu kí tự và được đọc vào tự bàn phím . b) Khai Báo Biến x có kiểu xâu kí tự và được gán là Hà Nội, Một biến y có kiểu dữ liệu là số nguyên và được đọc vào từ bàn phím.
a) var a:real;
b:string;
a:=20.5;
readln(b);
b) var x:string;
y:integer;
x:='Ha Noi'
readln(y);
Cho chương trình pascal sau
program kiem_tra;
var x,y : integer;
begin
x:=5;
y:=10;
x:=x+y;
y:=x-y;
end.
hãy cho biết giá trị cuối cùng của biến x và biến y là bao nhiêu
viết chương trình pascal hoán đổi giá trị của 2 biến x, y theo thứ tự không tăng
Cho mình hỏi thứ tự không tăng là gì?
viết chương trình pascal hoán đổi giá trị của 2 biến x, y theo thứ tự không tăng
Cho mình hỏi thứ tự không tăng là gì?
không tăng có nghĩa là giảm dần á bạn
*Viết chương trình ghi hai số 5 và 15 vào tệp so.txt:
const f='so.txt'
var f1:text;
begin
assign(f1,f); rewrite(f1);
writeln(f1,'5 15');
close(f1);
end.
*Viết chương trình tính tổng, hiệu, tích, thương của x,y và in kết quả ra màn hình:
uses crt;
const fi='so.txt'
var x,y:integer;
f1:text;
begin
clrscr;
assign(f1,fi); reset(f1);
readln(f1,x,y);
writeln('Tong la: ',x+y);
writeln('Hieu la: ',x-y);
writeln('Tich la: ',x*y);
writeln('Thuong la: ',x/y:4:2);
close(f1);
readln;
end.