Trang chủ Tin Học Lớp 8 Liệt kệ các cặp số Lucasa từ 1 đến 100....

Liệt kệ các cặp số Lucasa từ 1 đến 100. Vd:(1,1), (2,4), (3,9),.. mn giải giúp mik, pascal. câu hỏi 4703061 - hoctapsgk.com

Câu hỏi :

Liệt kệ các cặp số Lucasa từ 1 đến 100. Vd:(1,1), (2,4), (3,9),.. mn giải giúp mik, pascal.

Lời giải 1 :

uses crt;
var i,j: byte;
begin
clrscr;
for i:=1 to 50 do
for j:=1 to 100 do 
if sqr(i)=j then writeln ('(',i,';',j,')');
readln;
end.

image

Thảo luận

-- :))
-- Chặn ông luôn mà sao ko thấy chuyện gì xảy ra hết vậy ta =)))?
-- Nó cũng là chặn nhưng mà nó lạ lắm
-- ác vừa má ;-;
-- :))

Lời giải 2 :

var x,y:integer;

begin

writeln('Cac cap so Lucas tu 1 den 100 la: ');

for x:=1 to 50 do

for y:=1 to 100 do

if sqr(x)=y then

writeln('(',x,',',y,')');

end.

image

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Copyright © 2021 HOCTAP247