Using System;
// Написать программу, выводящую на экран таблицу квадратов
// четных чисел от 0 до 10 в убывающем порядке: 100, 81, 49...
// Составь блок-схему алгоритма, и напиши программу которая
// выводит на экране узор, состоящий из звездочек. Должно быть 20 строчек со звездочками так, чтобы в каждой последующей строке было на одну звездочку больше. Для вывода на экран строки, со- держащей N звездочек, используй команды
// String repeatedString = new String('*', N); Console.Write (repeatedString);
// Microsoft visual studio c#
namespace NoNamespace {
internal class Program {
private static void Main() {
SquaresOfNumbersDesc();
Stars(20, 10);
Console.ReadLine();
}
private static void SquaresOfNumbersDesc() {
Console.WriteLine();
for (var i = 10; i >= 0; i = i - 2) {
Console.Write("{0} ", i * i);
}
Console.WriteLine();
}
private static void Stars(int n, int start_stars) {
Console.WriteLine();
for (var i = 0; i < n; i++) {
Console.WriteLine(new String('*', start_stars + i));
}
Console.WriteLine();
}
}
}
ответ который он будет выводить 6 ,-1, 5, т.к.
1) на 1-ый ход -2<3 тогда В=3 А=4 С=7
2) на 2-ой 1<4 тогда В=1 А=5 С=6
3) на 3-ий 4<5 тогда В=-1 А=6 С=5
4) 7>6 тогда этот цикл закончивается и выводит А=6 В=-1 С=5
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := ReadReal('x=');
var y := x < 1 ? 2 * x + 1 : 3 * x - 1;
y.Print
end.
' 1. Даны 2 массива a и b каждый из 12 элементов.Найти R=pi*b(i)/a(max)
Function Zadanie20683579(A, B)
max = A(0)
for i = LBound(A, 1) To UBound(A, 1)
if max < A(i) then max = A(i)
next
R = 1
for i = LBound(B, 1) To UBound(B, 1)
r = r * B(i)
next
Zadanie20683579 = r / max
End Function
Function RandomArray(n, max)
ReDim A(n)
Randomize
for i = LBound(A, 1) To UBound(A, 1)
A(i) = max * Rnd
next
RandomArray = A
End Function
Msgbox Zadanie20683579(RandomArray(12, 50), RandomArray(12, 50))
