Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Trâm Vương
Xem chi tiết
Nguyễn Lê Phước Thịnh
22 tháng 2 2022 lúc 21:36

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.

Mai Bảo Cường
Xem chi tiết
Nguyễn Lê Phước Thịnh
6 tháng 10 2021 lúc 15:19

uses crt;

var x,y:integer;

begin

clrscr;

readln(x);

y:=sqr(x);

writeln(y);

readln;

end.

Nguyễn Thị Khánh Hân
Xem chi tiết
Nguyễn Lê Phước Thịnh
1 tháng 1 2022 lúc 11:07

#include <bits/stdc++.h>

using namespace std;

long long x,y;

int main()
{

cin>>x>>y;

swap(x,y);

cout<<x<<" "<<y;

return 0;

}

Lê Ân
Xem chi tiết
Phông
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 12 2020 lúc 21:08

a) var a:real;

b:string;

a:=20.5;

readln(b);

b) var x:string;

y:integer;

x:='Ha Noi'

readln(y);

Quỳnh Anh Lê Thị
Xem chi tiết
Nguyễn Lê Phước Thịnh
31 tháng 12 2021 lúc 11:33

x=15

y=5

bich lien
Xem chi tiết
RONALDO
15 tháng 12 2016 lúc 10:03

k mk đi xong mk sẽ nhắn tin trả lời cho bạn

bich lien
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 3 2022 lúc 14:30

không tăng có nghĩa là giảm dần á bạn

Lê Ngọc Ngân
Xem chi tiết
Nguyễn Lê Phước Thịnh
5 tháng 2 2021 lúc 21:41

*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.