Viga plus belgium it is a powerful product for boosting testosterone hormone generation and improving the quality of sexual strive. this mainly involves a stimulated metabolism that will help keep your body in a surplus of energy.
В примере ответы не соответствуют заданию: ищется самая большая цифра а не маленькая, а по условию должна искаться самая маленькая. Написал код, который соответствует именно заданию:
В примере ответы не соответствуют заданию: ищется самая большая цифра а не маленькая, а по условию должна искаться самая маленькая. Написал код, который соответствует именно заданию:
Объяснение:
var
n, k, min, colmin, i: integer;
begin
repeat
Write('Введите число: ');
Readln(n);
until (n>=10000) and (n<=99999);
k := n;
min := k mod 10;
k := k div 10;
for i := 1 to 4 do
begin
if (k mod 10 < min) then min := k mod 10;
k := k div 10;
end;
k := n;
for i := 1 to 5 do
begin
if (k mod 10 = min) then inc(colmin);
k := k div 10;
end;
WriteLn(min, ' ', colmin);
end.
Переменной a присвоено значение 7. Что будет
выведено на экран монитора в результате выполнения оператора Write(a);
а=7
7
а
Целочисленным переменным a, b, c надо присвоить соответственно значения 15, 22 и 37. Какой оператор ввода соответствует входному потоку 37 22 15?
read (a, b, c);
readln (a, b, c);
read (c, b, a);
write (b, a, c);
Что будет выведено на экран после выполнения следующей программы: var a,s:real; begin a: =3; s: =a*a; writeln('s=', s:3:1); end.
s=9.0
s:=9
9
s=9
С какой команды НЕЛЬЗЯ задать значение переменной a?
С команды присваивания
С команды write(a)
С команды read(a)
Для ввода в оперативную память значений переменных используется оператор
if
write
readln
end
Дан фрагмент программы: s:=414.34394;writeln (s:6:2); После его выполнения на экран будет выведено:
s:=414.34;
414.34394;
414.34;
s:=414.34394;