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.
Những câu hỏi liên quan
TN
24 tháng 12 2018
1)var a,b,c:real;
begin
write('a=');readln(a);
write('b=');readln(b);
write('c=');readln(c);
if (a+b>c) or (a+c>b) or (b+c>a) then writeln(' la 3 canh cua tam giac ')
else writeln(' khong phai la 3 canh cua tam giac ');
readln;
end.
NL
Nguyễn Lê Phước Thịnh
CTVHS
20 tháng 2 2023
Câu 6:
uses crt;
var n,i:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if n mod i=0 then write(i:4);
readln;
end.
5:
uses crt;
var n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=0 to n do
if i mod 2=1 then
begin
write(i:4);
dem:=dem+1;
end;
writeln;
writeln(dem);
readln;
end.
NL
Nguyễn Lê Phước Thịnh
CTVHS
19 tháng 12 2021
2:
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<a%b<<endl;
cout<<a/b;
return 0;
}
uses crt;
var a,m,i:integer;
s:real;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap m='); readln(m);
s:=1;
for i:=1 to m do
s:=s+1/sqr(a+i);
writeln(s:4:2);
readln;
end.