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.
uses crt;
var n,i,t:integer;
begin
clrscr;
readln(n);
t:=0;
for i:=1 to n-1 do
if i mod 2=0 then
begin
write(i:4);
t:=t+i;
end;
writeln;
writeln(t);
readln;
end.
n = int(input())
s = 0
for i in range(1, n):
if i % 2 == 0:
print(i)
s += i
print(s)
# Nhập danh sách số nguyên
lst = []
n = int(input("Nhập số lượng số nguyên trong danh sách: "))
for i in range(n):
lst.append(int(input("Nhập số nguyên thứ {}: ".format(i+1))))
# Tính tổng các số trong danh sách
total = sum(lst)
# Đưa ra kết quả
print("Tổng các số trong danh sách là:", total)
Var a:array[1..200] of integer;
i,n:integer;
s:longint;
Begin
Write('Nhap so luong so ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
End;
Writeln('Cac so vua nhap la ');
For i:=1 to n do write(a[i]:6);
Writeln;
Write('Tong la ');
For i:=1 to n do s:=s+a[i];
Write(s);
Readln;
End.
Test 1:
a=2; b=4
=>-2
Test 2:
a=0; b=0;
=>Vô số nghiệm
tong=float(input())
hieu=float(input())
a=(tong+hieu)/2
b=tong-a
print(a,b)