Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
zeker

контрольная

16.06.2009, 20:52. Показов 1205. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем добрый вечер, хотя он нефига не добрый. Завтро зачет а у мене нет еще допуска даже... Требуется помощь в решении 2-х задач. Каму не трудно помогите пож)

Задание №1
Задача на составление алгоритма линейной структуры. Решение данного задания должно содержать: блок схему задачи, словесное описание алгоритма, листинг программы и рисунок с формой.
______________
Задание: Вычислите значение функции f(x)=√(x-1)^2+(x-2)^2 - вся функция в корне

Задание №2
Задача на составление алгоритма сложной структуры. Решение данного задания должно содержать: блок схему задачи, словесное описание алгоритма, листинг программы и рисунок с формой 2.

Задание: Дана последовательность из N целых чисел. Определить, со скольких положительных чисел она начинается.
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.06.2009, 20:52
Ответы с готовыми решениями:

Контрольная по информатике...)))
Помогите решить контрольную по информатике - программирование в Визуал Бейсике... Сестра сосвсем замучила... задачи в приложении))) ...

Тяжелая Контрольная
Преподша дала задание по VB, а я его вообще не знаю. Она сказалы мы его поверхостно проходим, а сама тяжелое задание дала(для меня точно...

Помогите плз с составлением проги. Завтра контрольная!
http://content.foto.mail.ru/mail/apach6/_answers/i-5.jpg Pascal. Нужно составить прогу для вычисления Y

5
Человек
 Аватар для mustardandrew
97 / 82 / 7
Регистрация: 16.06.2009
Сообщений: 229
16.06.2009, 21:36
Ответ на 2 задание

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
#include <iostream>
using namespace std;
 
 
int main(){
    int n = 10;
    int* arr = new int[n];
    
    // create array
    for(int i = 0; i < n; ++i)
      arr[i] = (rand() % 50) - 25;
      
    // print array first time
    cout << "print array" << endl;
    for(int i = 0; i < n; ++i)
      cout << arr[i] << endl;
 
   int sum = 0;
   for(int i = 0; i < n; ++i)
       if(arr[i] >= 0) sum++;
       
   cout << "count(unsigned int) = " << sum << endl;
 
    getchar();
    return 0;   
}
Добавлено через 6 минут 17 секунд
Ответ на 1 задание

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#include <iostream>
#include "math.h"
using namespace std;
 
inline double sqr(double x){
   return x*x;       
}
 
int main(){
    cout << "Input x: ";
    double x;
    cin >> x;
    getchar();
    
    double fx = sqrt(sqr(x-1)+sqr(x-2));
 
    cout << endl << "f(x) = " << fx;
 
    getchar();
    return 0;   
}
1
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
16.06.2009, 21:40
mustard-andrew, но этоже С, а челу нужен Визбасик.
0
Человек
 Аватар для mustardandrew
97 / 82 / 7
Регистрация: 16.06.2009
Сообщений: 229
16.06.2009, 21:41
Я не смогу помочь тебе с схемами... (
нет времени.

Добавлено через 46 секунд
О не посмотрел нараздел.
)
0
 Аватар для BasicMan
19318 / 2625 / 84
Регистрация: 17.02.2009
Сообщений: 30,364
16.06.2009, 21:58
это 1
Visual Basic
1
2
3
4
5
6
7
8
9
private sub V()
    dim x as Double
    x=Val(Inputbox("Input x"))
    msgbox f(x)
end sub
 
private function f(x as Double) as Double
   f=sqr((x-1)^2+(x-2)^2)
end function
Добавлено через 10 минут 20 секунд
кстати, у тебя старые задачи остались, те что ты раньше делал?
1
5 / 5 / 4
Регистрация: 05.02.2014
Сообщений: 21
19.06.2009, 07:34
'Первая задача
'f(x) = sqr((x - 1) ^ 2 + (x - 2) ^ 2)
'f(x) = ((x - 1) ^ 2 + (x - 2) ^ 2)^1/2
Visual Basic
1
2
3
4
5
Dim x As Single
Dim f As Single
x = InputBox("Ââåäè X")
f = Sqr((x - 1) ^ 2 + (x - 2) ^ 2)
MsgBox "Îòâåò: " & f
'Вторая задача:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim a() As Integer
Dim n As Integer
Dim i As Integer, k As Integer
Dim s As String
n = 10
ReDim a(1 To 10)
For i = 1 To 10
    a(i) = Int(Rnd * 20) - 5
    s = s & a(i) & "  "
Next i
For i = 1 To 10
    If a(i) > 0 Then k = k + 1 Else Exit For
Next i
 
MsgBox s & vbCrLf & k
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
19.06.2009, 07:34
Помогаю со студенческими работами здесь

Контрольная
У меня сейчас контрольная по информатике, а я в ней ноль полный. Если есть люди, которые могут мне помочь(в Паскале на тему массивы), то...

контрольная
Всем привет ! Я на этом форуме первый раз, по этому извините, если что-то не так. У меня завтра контролная по информатике, на дом задали...

Контрольная
Помогите с контрольной пожалуйста Задание

контрольная
помогите плиз!!!!!!срочно Дан массив случайных чисел из интервала от 0 до 20. Сосчитать в этом массиве сколько нечетных и четных...

Контрольная
Что-то не получается, не подскажите?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru