4 года назад

Определите значение переменной А после исполнения данного алгоритма а:=10 в:=3*а+10 в:=в\4+а

Знания

Информатика

1 ответ:

Мила1111 [6]4 года назад

0 0

1)a=10
2) 3*10+10=40
3) 40/4+10=20
Ответ 20

Читайте также

Помогите выполнить алгоритм по указанной блок-схеме для двух разных значений переменной. СРОЧНО. Зарание спасибо.

Sherhorn

1)
возьмем число 42
42 больше либо равно 41 - да
42 -12 = 30
30 больше либо равно 41 - нет
значение равно 30

возьмем число 50
50 больше либо равно 41 - да
50 - 12 = 38
38 больше либо равно 41 - нет
значение равно 38

2)
число 41
3)
число 53
4)
число 40

0 0

4 года назад

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

Albinabela [7]

Uses crt;
var a,b: Integer;
Begin
Write('Введите целое число: ');
Read a;
While a>0 do
Begin
b:=b+a mod 10;
a:=a div 10;
End;
Writeln('Сумма цифр введённого числа равна ', b);
End.

0 0

4 года назад

Если в некоторой системе счисления десятичное число 47 записывается в виде 52, то чему равно основание этой системы?

Rediska11

Запишем уравнение: 52 по основанию х равно 47 по основанию 10.
52(х)=47(10)
5*х+2=4*10+7
5х=45 ⇒ х=9
Ответ: Основание системы равно 9

0 0

4 года назад

Пользователь работал с каталогом C:\Документы\Договоры\Продажа. Сначала он поднялся на один уровень вверх, затем спус

Юлия ТОПС

Пользователь работал с каталогом C:\Документы\Договоры\Продажа
Сначала он поднялся на один уровень вверх -> C:\Документы\Договоры
Затем спустился в каталог Срочные -> C:\Документы\Договоры\Срочные
Затем спустился в каталог Покупка -> C:\Документы\Договоры\Срочные\Покупка

Ответ: 2

0 0

4 года назад

Составить программу нахождения суммы, разности, произведения и частного 3-х случайных чисел из диапазона от 0 до 50. (Pascal)

Len1991 [37]

Program Zadacha;
 Var sum, raz, pr, ch, x, y, z: real;
Begin
 randomize;
 x:=random(50);
 y:=random(50);
 z:=random(50);
 sum:= x + y + z;
 Writeln('Сумма = ',sum:4:2);
 raz:= x - y - z;
 Writeln('Разность = ',raz:4:2);
 pr:= x * y * z;
 Writeln('Произведение = ',pr:4:2);
 ch:= x/y; ch:= ch/z;
 Writeln('Частное = ',ch:4:2);
End.

0 0

4 года назад