Viết chương trình tính tích từ 1 đến 10 chiều mai mik thi cuối kì 1 r giúp mik nhá!
Viết chương trình in ra các số chẵn nhỏ hơn hoặc bằng n(n nhập từ bàng phím) giúp mik chiều mai mik thi cuối kì 1
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if i mod 2=0 then write(i:4);
readln;
end.
[ Em hãy viết đoạn chương trình sử dụng vòng lặp For...do để in ra màn hình các số từ 1 đến 10 ]
giúp mik ik mai mik thi gk 2 r
tham khảo
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 10 do
t:=t+i;
writeln('Tong cac so tu nhien tu 1 toi 10 la: ',t);
readln;
end.
refer
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.
viết chương trình pascal tính tổng 10 số tự nhiên đầu tiên nhập từ bàn phím ( viết bằng thuật toán bài 6)
giúp mik lẹ vs ạ mai mik thi
có ai có đề thi cuối học kì 1 tất cả các môn ko gửi mik vs lớp 7 nhá
giúp ik mik sắp thi r
Ngữ văn bài QUA ĐÈO NGANG, TLV bài biểu cảm về món quà mà em yêu thích.
Viết chương trình nhập từ bàn phím các phần tử của 1 dãy số.Độ dài N nhập từ bàn phím.Tính tổng các phần tử số chẵn vừa nhập và in ra màn hình. Giúp mik vs ạ mai mik thi r😭
program TongSoChanTrongDay;
var
n, i, tong: integer;
a: array[1..100] of integer;
begin
tong := 0;
write('Nhap so phan tu cua day: ');
readln(n);
for i := 1 to n do
begin
write('Nhap phan tu thu ', i, ': ');
readln(a[i]);
if a[i] mod 2 = 0 then
tong := tong + a[i];
end;
writeln('Tong cac phan tu chan trong day la: ', tong);
readln;
end.
1.Em hãy viết chương trình tính tích các số từ 5 đến 50.
giúp mik với
#include <bits/stdc++.h>
using namespace std;
long long i,s;
int main()
{
s=1;
for (i=5; i<=50; i++) s=s*i;
cout<<s;
return 0;
}
Var s,i:longint;
Begin
s:=1;
For i:=5 to 50 do
s:=s*i;
Write('Tich la ',s);
Readln;
End.
a) viết chương trình tính chu vi, diện tích hình chữ nhật, hình tròn, hình vuông,hình tròn, hình vuông,hình tam giác.
b) viết chương trình tính giá trị biểu thức A=x2+x+1(với x nhập từ bàn phím )
mọi người giúp mik với thứ 3 là thi r mong mọi người giúp đỡ mik câu này:))
1-Viết chương trình tính các biểu thức sau:
a.3^2X 18 –3^2X 12=
b.[(245 div 10) div 3] mod 2 =
2-Viết chương trình nhập chiều dài và chiều rộng của hình chữ nhật. Tính chu vi và diện tích của hình chữ nhật.
giúp mik với ạ
[ Em hãy viết đoạn chương trình sử dụng vòng lặp For...do để in ra màn hình 10 chữ O ]
Bạn nào giúp mik đc ko, mai mik thi rồi
refer
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.
tham khảo
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.
Tham khảo
refer
uses crt;
var i: integer;
begin
clrscr;
for i:= 1 to 10 do
begin writeln ( ' O ' ) end;
readln
end.