Câu 1: Khai báo mảng gồm 100 phần tử Câu 2: Nếu vòng lặp for...do in ra màn hình các số 1 2 3...19 20 Câu 3: Vòng lặp sau cho kết quả là bao nhiêu? S=1; for i:=1 to 4 do S:=S*2; Câu 4: Nêu 3 ví dụ về: a/Vòng lặp chưa biết trước số lần lặp b/Vòng lặp biết trước số lần lặp
Giúp mình bài này
Viết chương trình nhập vào 1 cạnh a và chiều cao h của một hình tam giác. Tính và xuất kết quả S của hình tam giác đó ra màn hình.
Viết chương trình nhập vào 2 số nguyên a và b. Tính và in kết quả của c và d ra màn hình. Biết c là kết quả của phép chia lấy phần nguyên của avà b, d là kết quả của phép chia lấy phần dưcủa avà b
Giúp mình 2 câu này
Bài 1.Viết chương trình nhập vào 1 cạnh a và chiều cao h của một hình tam giác. Tính và xuất kết quả S của hình tam giác đó ra màn hình.
Bài 2. Viết chương trình nhập vào 2 số nguyên a và b. Tính và in kết quả của c và d ra màn hình. Biết c là kết quả của phép chia lấy phần nguyên của avà b, d là kết quả của phép chia lấy phần dư của a và b
ìm hiểu đoạn chương trình sau đây. Khồng cần viết chương trình,hãy cho biết lệnh writeln in ra màn hình giá trị của i,j,k là bao nhiêu?
i:=1;j:=2;k:=3;
while i<=6 do
begin i:=i+1; j:=j+1; k:=k+j; end;
space:=' '
write(I,space,j,space,k);
Các câu lệnh và khai báo sau trong pascal đúng hay sai?hãy chỉ ra lỗi sai nếu có
a) For i:=1 to 10; do x:=x+1;
b) For i: =1 to 10 do writeln('A')
c) Y:=5; while Y:=10 do Y:=Y+20;
d) s :=0; n :=0; ; while s<= 10 do n :=n+1;s:=s+n;
e) for i =100 to 20 do x :=x+2;
f) for i :=2 to 20 do x:=x+1;
Hãy cho biết kiểu dữ liệu của các biến cần khai báo dùng để viết chương trình để giải bài toán dưới đây:
a) Tìm diện tích S của hình tam giác với độ dài một cạnh a và chiều cao tương ứng h (a và h là các số tự nhiên được nhập từ bàn phím).
b) Tính kết quả C của phép chia lấy phần nguyên và kết quả d của phép chia lấy phần dư của 2 số nguyên a và b.
Em đã biết để có các kết quả tính toán đúng mục đích của chương trình, cần phải gán các giá trị dữ liệu thích hợp cho các biến. Hãy chạy chương trình dưới đây để tìm hiểu ngay sau khi khai báo biến ( trước khi gán giá trị dữ liệu cụ thể), biến có nhận giá trị dữ liệu ban đầu nào không? Nêu nhận xét của em về giá trị dữ liệu của biến ngay sau khi khai báo.
var A: integer; B: integer;
C: integer; D: integer;
begin
writeln(A);writeln(B);
writeln(C);writeln(D);
end.
bài này ở phần mở rộng trang 33 sách giáo khoa tin 8, các bạn chạy và nêu kết quả giúp mình nhé, mình cần gấp lắm.
Cho a bằng 9 b bằng 8 .tìm kết quả của biến s sau mỗi câu lệnh sau đây, với với ban đầu giá trị của s bằng 0
a) if (a+b) mod 2=0 then s:=b else s:=a;
Viết ct khai báo biến mảng nhập số N nhập giá trị, tính tổng các số lớn hơn 10 có trong dãy in kết quả
Hưỡng dẫn
Var I, n: integer;
A:array [1.. 100] of integer;
For i:= 1 to n do
Tổng=0
For i:= 1 to n do
If m[i] >10 then
Tổng:= tong + m[i]
For i:= 1 to n do