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.

18 tháng 12 2017

program thefirstprograms;

uses crt;

var a,b,c:longint;

begin

clrscr;

write('Nhap so thu nhat ');readln(a);

write('Nhap so thu hai ');readln(b);

write('Nhap so thu ba ');readln(c);

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

else if (b>a) and (b>c) then writeln(b,' la so on nhat')

else if (c>a) and (c>b) then writeln(c,' la so lon nhat')

else (a=b=c) then writeln('Ba so bang nhau');

readln

end.

30 tháng 12 2022

Input: a,b

Output: max,min của hai số a,b

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,ln;

int main()

{

cin>>a>>b>>c;

ln=a;

ln=max(ln,b);

ln=max(ln,c);

cout<<ln;

return 0;

}

uses crt;

var a,b,c,max,t:integer;

begin

clrscr;

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

t:=a+b+c;

writeln('Tong cua 3 so la: ',t);

writeln('So lon nhat trong 3 so la: ',max);

readln;

end.

uses crt;

const fi='max.out';

var f1:text;

a,b,c,max:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f1,max);

close(f1);

readln;

end.

14 tháng 4 2022

Tham khảo:

undefined

uses crt;

const fi='max.out';

var f1:text;

a,b,c,max:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln(f1,max);

close(f1);

readln;

end.

6 tháng 3 2023

a = int(input('Nhập số nguyên a: '))

b = int(input('Nhập số nguyên b: '))

c = int(input('Nhập số nguyên c: '))

if a > b and a > c:

          print('Số lớn nhất là a =', a)

elif b > a and b > c:

          print('Số lớn nhất là b =', b)

else:

          print('Số lớn nhất là c =', c)

2 tháng 12 2021

Tham khảo:

21 tháng 6 2020

program hello;

uses crt;

Var n,i,j,k: integer;

a: array[1..50] of integer;

begin;

a[1]:=k;

Readln(n);

For i:=1 to n do

Begin;

Writeln('nhap a[',i,'] '); Readln(a[i]);

End;

For i:=1 to n-1 do

For j:=i+1 to n do

If a[i]<a[j] then k:=a[j];

Writeln('gia tri lon nhat la', k);

end.