Нарисовать расположение чисел.напечатанных следующей последовательностью операторов Паскаля…

1. Базовая алгоритмическая структура

разветвления в языке Паскаль — …

Вставьте пропущенные слова.

2. Какие операторы записаны без ошибок?

А) If a> 0 Then x := a Else y: = b;

Б) If a> 0 Then x = a; Else y = b;

В) If a> 0 Then x = a; Writeln (x) else y =

b; Writeln (y)

3. Какое значение будет предоставлено

переменной x в результате выполнения

оператора

If a> 0 Then x: = a + 1 Else x: = 2 * a;

Если значение переменной a равнo 5;

A) -15;

B) 6;

D) 10?

4. Составьте программу, которая

спрашивает пользователя, который час, и

выводит на экран соответствующее

пожелание — «Доброе утро!»,

«Здравствуйте!», «Добрый вечер!» или

«Доброй ночи!». Для каждого пожелания

.выберите соответствующий цвет.

5 Компьютер должен перемножить два

числа — 167 и 121. Если их произведение

превышает 2000, то компьютер должен

напечатать текст ПРОИЗВЕДЕНИЕ

БОЛЬШОЕ, иначе текст ПРОИЗВЕДЕНИЕ

МАЛЕНЬКОЕ. После этого компьютер в

любом случае должен напечатать само

произведение.

Нужно написать программу на паскале

Вводится произвольная последовательность действительных чисел. Найти наименьшее из всех чисел.

И сделать блок схему или алгоритм

Расположите в правильном порядке строки программы:

1) S:=a*h;
6) var a,b,h,p,s: integer;
2) end.
7) readln;
3) program pr;
Writeln(‘p=’,p,’ s=’,s);
4) p:=(a+b)^2;
9) a:=5;b:=8;h:=3;
5) begin

2. Установите соответствие между служебными словами и названиями разделов программы:
а) Var а) Раздел операторов
b) Program b) Раздел имени программы
c) Uses c) Раздел описания переменных
d) Begin …end d) Раздел описания библиотечных модулей

3. Определите значение переменной a после выполнения алгоритма:
а := 8
b := 2
b := a/2*b
a := 2*а + 3*b
В ответе укажите одно целое число — значение переменной a.

4.Запишите значение переменной y, полученное в результате работы следующей программы.
var y, i: integer;
begin
y := 0;
for i := 1 to 3 do
y := y + 4 * i;
writeln(y);
end.

5.Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
var t, i: integer;
begin
t := 2;
for i := 1 to 3 do
t := t * i;
writeln(t);
end.

​

6. Запиши название арифметических операций, а также, пример и результат

procedure F(n: integer);

begin

write(n);

if n >= 4 then begin

F(n div 3);

F(n — 1)

end

end;

Запишите подряд без пробелов и разделителей все числа, которые будут напечатаны на экране при выполнении вызова F(6). Числа должны быть записаны в том же порядке, в котором они выводятся на экран.

На Pascal ABC

Задача № 1. Дан аргумент функции. Вычислить ее результат, если (на картинке)

Задача № 2.Написать программу, определяющую значение функции, заданной графиком: (на картинке график)

1°.Виконайте алгоритм і запишіть у зошит хід його виконання:

1. Задумати два цілих числа

2. Обчислити суму задуманих чисел

3. Перевірити «Знайдена сума більша за 30?»

4. Якщо істина, то повідомити «Більша» і виконати команду 8, якщо хіба, хто виконайте команду 7

5. Перевірити «Знайдена сума менше ніж 30?»

6.Якщо істина, то повідомити «Менша» і виконати команду 8, якщо хіба, хто виконайте команду 7

7. Повідомити «Дорівнює»

8. Закінчити виконання алгоритму.

После выполнения программы, записанной на языке Pascal на экран будет выведено: program prim; var s:integer; begin s:=15; write(‘s:=‘,s/3); end. 1) s:=15 2) s=45 3)’s=‘15 4)s= 5

Составить блок-схему алгоритма и программу на языке паскаль, для вычисления значения функции.

Почему код выводит сразу числа вот задание объясните пожалуйста

В классе Program напишите следующие методы и вызовите их в

главном методе Main:

1. Метод, с помощью которого вычисляется периметр и площадь

прямоугольного треугольника по введенным пользователем длинам

двух катетов a и b.

2. Метод, с помощью которого можно вывести на экран последовательность

n первых нечетных натуральных чисел. Количество чисел n пользователь

вводит с клавиатуры.

3. Метод, который создает и выводит на экран массив из n случайных целых

чисел в диапазоне от 0 до 100 (число n вводится с клавиатуры), а затем

подсчитывает произведение всех элементов массива.

using System;

class Program

{

static void Main()

{

CalculateThePerimeterAndArea(10,45);

ShowSequenceOfOddNumbers(5);

CreateAndShowArray(5);

}

static void CalculateThePerimeterAndArea(int a, int b)

{

Console.WriteLine(«S=» + (double)(a*b/2));

Console.WriteLine(«P=» + (double)(Math.Sqrt(a*a+b*b) + a + b));

}

static void ShowSequenceOfOddNumbers(int n)

{

for(int i = 1, c = 0; c < n; i++)

if (i % 2 != 0)

{

Console.Write(i + » «);

c++;

}

Console.WriteLine();

}

static void CreateAndShowArray(int n)

{

int[] a = new int[n];

long p = 1;

for (int i = 0; i < n; i++)

{

a[i] = new Random().Next(0, 100);

Console.Write(a[i] + » «);

p *= a[i];

}

Console.WriteLine();

Console.WriteLine(«Произведение=» + p);

}

}