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.

14 tháng 4 2017

program vietchuongtrinh;

uses crt;

begin

clrscr;

writeln('Hello');

writeln('"Toi la Turbo Pascal"');

readln;

end.

14 tháng 4 2017

phải khai báo kiểu dữ liệu nữa kêr ._.

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

11 tháng 12 2020

a) var a:real;

b:string;

a:=20.5;

readln(b);

b) var x:string;

y:integer;

x:='Ha Noi';

readln(y);

23 tháng 3 2022

1 là bn sửa hình nền

2 là mk gọi admin hoặc giáo viên khác khoá nick bn

23 tháng 3 2022

sửa kiểu j vậy?

7 tháng 11 2021

Program tinh_tong;

uses crt;

var a,b:Integer;

begin

Write('Nhap gia tri a: ');

Readln(a);

Write('Nhap gia tri b: ');

Readln(b);

Writeln('Tong: ',a+b);

Readln();

end.

Câu 3: 

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

25 tháng 4 2023

a)

program TenCuaMinh;
var
  i: integer;
begin
  for i := 1 to 10 do
    writeln('Tên của mình là: <tên>');
end.

b)

program MangSoNguyen;
var
  M: array[1..100] of integer;
begin
end.