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.

23 tháng 12 2017

Program bai1;

uses crt;

var n , i : integer;

s: real;

begin

clrscr;

write('nhap so n ='); readln(n);

for i:= 1 to n do

s:=s+sqrt((n-1)+sqrt(n));

writeln('tong s = ' ,s:4:2);

readln;

end.

23 tháng 12 2017

program bai1;

uses crt;

var

begin

clrscr;

write('Nhap so N=);readln(n);

s:=0;

for i:=i to n do

s:=s+sqrt(i+sqrt(i+1));

writeln('Tong la ',s);

readln

end.

6 tháng 1 2019

ờ nhưng tại sao kêu t tag vậy Hùng, m tag ko đc ak ?

@Nguyễn Trần Thành Đạt

6 tháng 1 2019

Tú Nguyễn B (Erik) Trương Quang Dũng hành động đi các bạn, đây là sân chơi của các bạn, cộng đồng đang chờ bạn, gia đình chờ bạn, bạn bè chờ bạn ><

8 tháng 1 2019

var P,x,y,z,t : integer ;

begin

write('nhap gia tri x'); readln(x);

write('nhap gia tri y'); readln(y);

write('nhap gia tri z'); readln(z);

write('nhap gia tri t'); readln(t);

P:=sqrt(x*x+9)*sqrt((5*x+3)/sqrt(x))-sqrt((x*x+x)/(2*x))+abs(z-9*x)+sqrt(((y+5)*(y+5))/abs(t+99)) ;

Write('Gia tri cua P=',P);

readln

end.

8 tháng 1 2019

bạn làm sai rồi cái này tính không phải in với bạn nhập write thiếu ' rồi

29 tháng 4 2019

Qúa dài nên lười gõ -.- Lập trình đơn giản

30 tháng 4 2019

viết pascal hay là giải toán thế :v

17 tháng 4 2018

program tinhp;

uses crt;

var x,n,i: integer;

s: real;

begin

write('Nhap n:');

readln(n);

write('Nhap x:');

readln(x);

s: sqrt(x);

for i:=1 to do s:= sqrt (x+s);

write('tong s=',s:6:2);

readln;

end.

13 tháng 11 2019

câu 2 bạn xem lại đề nhé

câu 1:

bước 1: nhập n

bước 2: t:=0; i:=2;

bước 3: t:=t+1/i; i:=i+1;

bước 4: nếu i<=n thì quay lại bước 3

bước 5: xuất t

bước 6: kết thúc

D
datcoder
CTVVIP
6 tháng 10 2023

#include <bits/stdc++.h>

using namespace std;

int main() {

long long n;

cin >> n;

int can = (long long)(sqrt(n));

cout << n + can;

return 0; 

 } 

7 tháng 1 2019

Đam mê nhỉ ><

@Luân Đào Tú Nguyễn B (Erik) Trương Quang Dũng

7 tháng 1 2019

đoán xem oaoa!!!