de 1:

huong dan

- Nhập hai cạnh vào hai biến a, b.

- Chu vi hình chữ nhật bằng 2*(a+b); Diện tích hình chữ nhật bằng a*b.

b. Mã chương trình:

Program Chu_nhat;

uses crt;

Var a, b, S, CV: real;

Begin

Write('Nhap chieu dai:'); readln(a);

Write('Nhap chieu rong:'); readln(b);

S := a*b;

CV := (a+b)*2;

Writeln('Dien tich hinh chu nhat la:',S);

Writeln('Chu vi hinh chu nhat la:',CV:10:2);

readln

end.

de 3,

program bt;
uses CRT;
var m,n:integer;
T:real;
BEGIN clrscr;
write('m,n ='); readln(m,n);
writeln('Tong la:',m+n);
writeln('Hieu la:',m-n);
writeln('Tich la:',m*n);
T:=m/n;
writeln('Thuong la:',T);
readln
END.

reset lại máy đi bạn

theo mình cái USB bạn gắn vào máy tính có virus hoặc phần mềm độc hại cho máy tính nên phần mềm USB dick security ko cho nó hoạt động ( khóa USB đó lại hoặc đóng băng nó) nếu bn muốc kết nối USB vào máy tính dc bn nên quét virus cho USB rồi mới cắm vào máy tính

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

if (a%b==0) cout<<"YES";

else cout<<"NO";

return 0;

}

phải đc tg cho phép thì mới đc

ko, vì đã ghi rõ tên tác giả và h/a đã đc tác giả cho phép ng dùng sd

Var

m,n,i,j,h,dem:integer;

Begin

writeln('Hay nhap m:');

readln(m);

writeln('Hay nhap n:');

readln(n);

if m<n

for i:=m to n do

if i>0 Then
begin
Writeln('Cac so nguyen to tu 2 den ',n,' la:');
for j:=2 to i Do
begin
dem:=0;
for h:= 1 to j do if j mod h=0 then dem:=dem+1;
if dem=2 then write(j,' ');
end;

readln;

end.

Bạn ơi ở if m<n bạn thiếu then

Và đề không yêu cầu đếm có bao nhiêu số nguyên tố

5 bước ra lệnh cho robot nhặt rác:

1. Tiến hai bước

2.Quay trái, tiến một bước

3.Nhặt rác

4.Quay phải, tiến ba bước

5.Quay trái, tiến hai bước

6. Bỏ rác vào thùng

Bạn tham khảo trong bài giảng của hoc24 nhé : Bài 1. Máy tính và chương trình trong máy tính | Học trực tuyến

5 bước ra lệnh cho robot nhặt rác:

1. Tiến hai bước

2.Quay trái, tiến một bước

3.Nhặt rác

4.Quay phải, tiến ba bước

5.Quay trái, tiến hai bước

6. Bỏ rác vào thùng