2. Свойства данных в ячейках определяются:
1) свойствами границ
2) размером кегля
3) размерами ячейки
4) типом числовых данных в ячейках
3. Готовые графические изображения можно редактировать с текстовых процессоров:
1) изменяя яркость
2) создавая новые слои
3) изменяя Цвета растровых изображений
4) создавая анимацию
4. Для распознавания текста с печатного носителя и ввода его в
память компьютера для редактирования целесообразно
использовать
1) видеокамеру
2) клавиатуру
3) сканер
4) микрофон
Dim a As Integer
Dim b As Integer
Dim i As Integer
a = InputBox("Введите а")
b = InputBox("Введите b")
Dim msg As String
msg = ""
For i = a To b
msg = msg & 3 в степени " & i & " равно " & 3 ^ i & vbCrLf
Next
MsgBox(msg)
2)Найти все делители числа 1204.
Dim i As Integer
Dim msg As String
msg = ""
For i = 1 To 1204
If 1204 Mod i = 0 Then
msg = msg & "Число " & i & " является делителем 1204." & vbCrLf End If
Next
MsgBox(msg)
c++
#include <iostream>
using namespace std;
int main() {
setlocale(0, "");
int x, t[2][2] = {0}, y = 1;
cout << "Введите температуру(99 - ввод окончен): ";
cin >> x;
if (x == 99) goto out;
t[0][0] = x;
t[1][0] = y;
y++;
cout << "Введите температуру(99 - ввод окончен): ";
cin >> x;
if (x == 99) goto out;
if (x >= t[0][0]) {
t[0][1] = x;
t[1][1] = y;
}
else {
t[0][1] = t[0][0];
t[0][0] = x;
t[1][1] = t[1][0];
t[1][0] = y;
}
y++;
while (x!=99) {
cout << "Введите температуру(99 - ввод окончен): ";
cin >> x;
if (x > t[0][0] && x < t[0][1]) {
t[0][1] = x;
t[1][1] = y;
}
else if (x < t[0][0]) {
t[0][1] = t[0][0];
t[0][0] = x;
t[1][1] = t[1][0];
t[1][0] = y;
}
y++;
}
out:cout << "Два самых холодных дня (в порядке убывания температуры): " << t[1][0] << " " << t[1][1];
return 0;
}