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.

14 tháng 4 2022

giúp mình với ạ, môn nghề lớp 8 ạ

 

CÂU TL LÀ Trường hợp nào "thầy ông nội" Lê Tùng Vân hết được tại ngoại, bị bắt giam?

uses crt;

var st,s1,s2:string;

i,max,x,y,d1,d2:integer;

begin

clrscr;

write('Nhap xau:'); readln(st);

s1:=#32;

for i:=1 to length(st) do 

  if st[i] in ['a'..'z'] then s1:=s1+st[i];

d1:=length(s1);

for i:=1 to d1 do 

  s1[i]:=upcase(s1[i]);

writeln('Xau ky tu da chuyen sang hoa la: ',s1);

s2:=#32;

for i:=1 to length(st) do 

  if st[i] in ['0'..'9'] then s2:=s2+st[i];

write('Day so dao nguoc la: ');

d2:=length(s2);

for i:=d2 downto 1 do 

  write(s2[i]);

writeln;

max:=0;

for i:=1 to d2 do 

  begin

val(s2[i],x,y);

if max<x then max:=x;

end;

writeln('Chu so lon nhat la: ',max);

readln;

end.

9 tháng 5 2022

v

 

9 tháng 5 2022

:v?

Câu 17: C

Câu 18: A

Câu 19: C

Câu 2: A

Câu 4: C

Câu 6: C

15 tháng 3 2021

Program HOC24;

var t: longint;

n,i: integer;

begin

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

t:=1;

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

write(n,'! =',t);

readln

end.

25 tháng 9 2016

dòng nào cũng 5 kí tự ?

25 tháng 9 2016

begin

   writeln('*****');

   writeln('*****');

   writeln('*****');

   writeln('*****');

   writeln('*****');

   readin

end.