giúp em sửa các khai báo biến mảng trong pascal đúng hay sai
a) B:=1; while B=1 do B:=B+5
b) for D+1 to 50 do writeln(D);
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.
TG
1
26 tháng 7 2023
program tinh_tong_chia_het_cho_6;
uses crt;
var
n, i, tong: integer;
begin
write('Nhap so N: ');
readln(n);
tong := 0;
for i := 1 to n do
begin
if i mod 6 = 0 then
begin
tong := tong + i;
end;
end;
writeln('Tong cac so chia het cho 6 la: ', tong);
readln;
end.
NA
Nguyễn An Ninh
VIP
25 tháng 4 2023
#include <bits/stdc++.h>
using namespace std;
int main()
{
long long n,dem=0,s=0;
cin >> n;
for (long long i=1;i<=n;i+=2){
dem++;
s+=i;
}
cout << "tu 0 den n co: " << dem << " so le" << endl;
cout << "tong cac so le do la: " << s;
return 0;
LM
1
Đây là những câu lệnh lặp không phải khai báo biến mảng bạn nha.
a/ -> Đúng nhưng đây là vòng lặp vô hạn
b/ -> Sai. Vì không có biến đếm.