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.

Bài 2: 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<(a+b)*2<<endl;

cout<<a*b;

return 0;

}

2 tháng 11 2016

à, bài này mk bik nè

 

Program So_Lon_Nhat;

uses crt;

var a,b,c:integer;

Begin

Writeln(' Nhap 3 so nguyen:');

Readln(a,b,c);

if (a>b) and (a>c) then write(' a la so lon nhat');

if (b>a) and (b>c) then write('b la so lon nhat');

if (c>a) and (c>b) then write('c la so lon nhat')

else write(' khong co so nao lon nhat');

Readln;

End.

Vì pascal ko vik dấu dc nên ỡ đây mk cx ko vik dấu ^^ tự hỉu nha ^^

5 tháng 11 2016

à, bạn ơi, khi viết ct có thể qua program, với lại bạn thiếu chấm phẩy, cái readln trên từ end ko cần chấm phẩy cũng ko sao

Bài 1:

uses crt;

var i,s:integer;

begin

clrscr;

s:=0;

for i:=10 to 50 do

  if i mod 2=0 then s:=s+i;

writeln(s);

readln;

end.

Bài 2: 

uses crt;

var a,i,n:integer;

begin

clrscr;

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

a:=0;

for i:=1 to n do

a:=a+i*(i+2);

writeln(a);

readln;

end.

Câu 2: 

cout<<"nhap so nguyen a: ";

22 tháng 12 2020

Xác định bài toán

-Input: Số a,b nguyên

-Output: Tổng của hai số nguyên đó

Mô tả thuật toán

-Bước 1: nhập a,b

-Bước 2: \(t\leftarrow a+b\);

-Bước 3: Xuất t

-Bước 4: Kết thúc

19 tháng 11 2021

nếu là c++ thì bạn chỉ cần :

tạo 2 biến có thể nhập từ bàn phím a, b

xuất tổng của a và b

vd:

#include<iostream>

using namespace std;

int main() {

int a, b;

cin >> a >> b;

cout << a + b;

return 0;

}

 

7 tháng 8 2021

program tim_dien_tich;

uses crt;

var a1,a2,b1,b2,x1,x2,i,dem:longint;

dtnn,dt1,dt2,dt3,dt4,dt5,dt6:real;

x3:array[1..1000]of longint;

dt:array[1..1000]of real;

begin

  clrscr;

  write('nhap chieu dai va chieu rong:');readln(a1,b1);

  a2:=a1;b2:=b1;dt1:=a1*b1;dt2:=dt1/2;

  x1:=0;i:=0;dem:=0;

  writeln(dt2:5:1);

  writeln(x1);

  while x1<b1 do

  begin

    dt3:=a2*x1/2;

    dt4:=(b2-x1)*x1/2;

    dt5:=b2*(a2-x1)/2;

    dt6:=dt1-dt3-dt4-dt5;

    dt[i]:=dt6;x3[i]:=x1;

    x1:=x1+1;i:=i+1;dem:=dem+1;

  end;

  dtnn:=dt[1];

  for i:=1 to dem do

  begin

    if (dtnn>dt[i])and(dt[i]<>0) then dtnn:=dt[i];

  end;

  writeln(dtnn:5:1);

  for i:=1 to dem do

  if dtnn=dt[i] then writeln(x3[i]);

  readln;

end.

18 tháng 3 2022

Tham khảo
Bài 2.
Var i:integer;
begin
for i:=1 to 100 do
if i mod 2=0 then write(' Cac so chan tu 1 den 100 la: ',i,' ');
readln;
end.

18 tháng 3 2022

mk quên nói đây là viết theo kiểu Python á 

#include <bits/stdc++.h>

using namespace std;

long long n,i,s;

int main()

{

cin>>n;

if (n%2==0)

{

s=1;

for (i=1; i<=n; i++)

if (i%2==0) s=s*i;

cout<<s;

}

else 

{

s=1;

for (i=1; i<=n; i++)

if (i%2==1) s=s*i;

cout<<s;

}

return 0;

}

13 tháng 3 2023

Uses crt;

var i,n,y: integer;

begin clrscr;

readln(n);

for i:=1 to n do s:=i*i;

Writeln(s);

readln;

end.

13 tháng 3 2023

Program HOC24;

var i,n: integer;

s: longint;

begin

write('Nhap n: '); readln(n);

s:=0;

for i:=1 to n do s:=s+sqr(i);

write('S= ' ,s);

readln

end.