сервис вопросов и ответовЗачет по информатике,нужна ваша помощь.
10-11 класс|
|
Какие информационные технологии есть в медицине?
Что такое телемедицина?
Где пригодятся знания компьютера мед.сестре?
Tiamatra
29 янв. 2014 г., 5:56:48 (10 лет назад)
NastyaDeewa
29 янв. 2014 г., 7:18:51 (10 лет назад)
Телемедицина это направление медицины, основанное на использовании компьютерных и телекоммуникационных технологий для обмена медицинской информацией между специалистами с целью повышения качества диагностики и лечения конкретных пациентов.
Ответить
Другие вопросы из категории
напишите программу, которая запрашивает четыре целых числа и выдает на экран: 1)сумму чисел; 2)сумму квадратов чисел; 3)среднее арифметическое чисел; 4)сум
му парных произведений.
Составить приложение на языке Pascal.
С помощью ПК произвести обработку одномерного массива, заданного
в таблице. Элементы одномерного массива задать числами в диапазоне
– 20 . . . +50. Необходимо:
описать массив
ввести элементы массива из заданного диапазона;
выполнить с элементами массива действия
вывести результаты на экран.
Напишіть, що це все означає
procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.Text='' then ShowMessage(Пусті значення недопустимі') else
if edit2.Text='' then ShowMessage('Пусті значення недопустимі') else
if edit3.Text='' then ShowMessage('Пусті значення недопустимі') else
if edit4.Text='' then ShowMessage('Пусті значення недопустимі') else
if edit5.Text='' then ShowMessage('Пусті значення недопустимі')else
if edit6.Text='' then ShowMessage('Пусті значення недопустимі')else
begin
edit7.Text:=floattostr(strtofloat(edit1.Text)*strtofloat(edit4.Text));
edit10.Text:=floattostr(strtofloat(edit7.Text)/100*13);
edit13.Text:=floattostr(strtofloat(edit7.Text)-strtofloat(edit10.Text));
edit8.Text:=floattostr(strtofloat(edit2.Text)*strtofloat(edit5.Text));
edit11.Text:=floattostr(strtofloat(edit8.Text)/100*13);
edit14.Text:=floattostr(strtofloat(edit8.Text)-strtofloat(edit11.Text));
edit9.Text:=floattostr(strtofloat(edit3.Text)*strtofloat(edit6.Text));
edit12.Text:=floattostr(strtofloat(edit9.Text)/100*13);
edit15.Text:=floattostr(strtofloat(edit9.Text)-strtofloat(edit12.Text));
edit16.Text:=floattostr(strtofloat(edit13.Text)+strtofloat(edit14.Text)+strtofloat(edit15.Text));
end;
end;
end.
Помогите написать в паскале!
Ввести три целых числа x, y, z. Если хотя бы одно из них четное,
то первому четному числу присвоить значение произведения этих чисел.
Читайте также
помогите пожалуйста с зачетом по информатике
31 вопрос,нужно выбрать правильный Ответ.спс
очень надо
НУЖНА ВАША ПОМОЩЬ!
1) Найти объем текста, записанного на языке, алфавит которого содержит 512 символов 16 символьного алфавита.
2) Информационное сообщение объемом 4 Кбайта содержит 4096 символов. Сколько символов содержит алфавит, при помощи которого было записано это сообщение?
3) Вычислить информационный объем текстового документа в Мбайт (с точностью до сотых) :
Книга рекордов Петербурга - 235 страниц, 60 символов в строке, 48 строк на странице.
Вы находитесь на странице вопроса "Зачет по информатике,нужна ваша помощь.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.