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.
em hãy viết chương trình in ra phép toán và dòng chữ sau:
12+20=32
chào các bạn mình là học sinh lớp 9
uses crt;
begin
clrscr;
writeln('12+20=',12+20);
writeln('chao cac ban minh la hoc sinh lop 9');
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b,c;
bool kt;
int main()
{
cin>>a>>b>>c;
kt=false;
if (a==(b+c)/2) kt=true;
if (b==(a+c)/2) kt=true;
if (c==(b+a)/2) kt=true;
if (kt==false) cout<<"Khong lap duoc";
else cout<<"Lap duoc";
return 0;
}
-Những Yếu Tố ảnh hưởng đến sự an toàn tt của máy tính là
+ Virus , bảo quản và sử dụng , công nghệ - vật lý
- Những phần mềm diệt virus
+BKAV
+ AVAST FREE ANTIVIRUS
+AVIRA
+KASPERSKY
câu 1
Program Nguyen_to;
Var n,i:integer;
Function NT(n:integer):Boolean;
Var ok: Boolean;
i: integer;
Begin ok:=true;
for i:=2 to n-1 do if (n mod i)= 0 then ok:=ok and false;
if n < 2 then NT:=false else NT:=ok;
End;
Begin Write('Nhap n: ');
Readln(n); i:=n;
Repeat i:=i+1;
Until NT(i);
Write('So nguyen to nho nhat lon hon ',n, 'la: ',i);
Readln End.
câu 2
uses crt;
const so: set of char=['0','1','2','3','4','5','6','7','8','9'];
var a:array[1..100] of integer;
st,b:string;
c,l,i,n,j:integer;
s, Max: integer;
begin clrscr;
write('Nhap xau:');
readln(st);
l:=length(st);
i:=1;
n:=0;
repeat if (st[i] in so) then begin b:='';
repeat b:=b+st[i];
inc(i);
until (not(st[i] in so)) or (i>l);
inc(n);
val(b,a[n],c);
end;
inc(i);
until i>l;
Max:=a[1];
for i:=2 to n do If Max<A[i] Then Max:=A[i];
Writeln('Phan tu lon nhat cua mang:', Max);
readln;
end.
when green flag clicked
forever
if <not <touching color [#000000] ?>> then
turn left 90 degrees
move 10 steps
else
if <not <touching color [#000000] ?>> then
move 10 steps
else
turn right 90 degrees
end
end