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.

26 tháng 10 2016

program vantoc;

uses crt;

var v,s,t:real;

begin

writeln('nhap quang duong km');

readln(s);

writeln('nhap thoi gian h');

readln(t);

v:=s/t;

writeln('thoi gian la',v:4:2);

readln

end.

19 tháng 12 2017

*Thuật toán là một phần của chương trình thể hiện được các thủ thuật thông minh của người lập trình để máy chạy đúng nhất, ít lãng phí bộ nhớ và thời gian nhất.

* Các bước để giải một bài toán trên máy tính:

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

+ Lựa chọn hoặc thiết kế thuật toán

+ Viết chương trình

+ Hiệu chỉnh

+ Viết tài liệu.

19 tháng 12 2017

Tin học 10 này! Đập tay nhé! vui

2 tháng 11 2019

1 2 2 4 3 8 11 8

Ý là a[1]/a[2] ; a[3]/a[4] ;.....

Bạn ghi lại đề chi tiết hơn nhé.

4 tháng 12 2016

1. Khai báo 2 biến: a và b (trong đó: a là chiều dài, b là chiều rộng)
Cho người dùng nhập giá trị vào 2 biến trên

Công thức chu vi:(a+b)*2
Công thức diện tích: a*b

Điều kiện bổ sung:
+ Nếu a <= 0 hoặc b <=0 hoặc cả a,b <=0 => Báo lỗi (Chiều dài không bao giờ âm)!
+ Nếu a=b => Báo lỗi (Hình chữ nhật thì chiều dài không thể bằng chiều rộng)

8 tháng 12 2016

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.

13 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<"Tong la:"<<t<<endl;

if (t%2==0) cout<<"Tong la so chan";

else cout<<"Tong la so le";

return 0;

}

27 tháng 12 2017

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

6 tháng 2 2018

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

14 tháng 11 2019

S=1/2.a.h

14 tháng 11 2019

Lập trình đơn giản

4 tháng 11 2018

bạn dùng bài thực hành trong SGK, thay đổi hằng phi lại thành 22000 là được nhé

24 tháng 12 2019

a)

Program bt;

Var a,b,c,tb:real;

Begin

Writeln('nhap a:=');

Readln(a);

Writeln('nhap b:=');

Readln(b);

Writeln('nhap c:=');

Readln(c);

tb:=a+b+c/3;

Writeln('diem trung binh cua ba mon:=',tb);

Readln;

End.

b)

Program bt;

Var tb:real;

Begin

Writeln('nhap tb:=');

Readln(tb);

if tb >=8,0 then writeln('hoc luc gioi') else writeln('hoc luc kha');

Readln;

End.

24 tháng 12 2019

Hỏi đáp Tin học