ANTICHAT — форум по информационной безопасности, OSINT и технологиям

CODE SEGMENT
ASSUME CS:CODE, DS:CODE
ORG 100H
BEGIN:
JMP BEG
TEXT1 DB 'Нет параметров.',13,10,'$'
TEXT2 DB 'Файл не найден.',13,10,'$'
PATH DB 80 DUP(O) ;путь к файлу
BUF DB 160 DUP(?) /буфер для чтения файла
BEG:
;блок анализа командной строки
XOR SI,SI
XOR DI,DI
MOV DL,1
LOO:
CMP BYTE PTR [81H+SI],ODH
JZ NO_PAR
MOV AL,[81H+SI]
CMP AL,' '
JZ SPACE
XOR DL,DL
MOV [PATH+DI],AL
INC DI
JMP SHORT L001
SPACE:
OR DL,DL ;если DL=0 тогда первый параметр закончился
JZ NO_PAR
L001:
INC SI
JMP SHORT LOO
NO_PAR:
OR SI,SI ;был ли параметр
JNZ CONT
/сообщение, затем выходим
MOV DX,OFFSET TEXT1
MOV AH,9
INT 21H
JMP EXIT
/теперь открытие и преобразование файла
CONT:
/открыть файл
LEA DX,PATH
MOV AX,3D02H
INT 21H
JNC NORM
MOV DX,OFFSET TEXT2
MOV AH,9
INT 21H
JMP EXIT
NORM :
MOV BX,AX
XOR DI,DI ;в DI будет хранится начало считываемого участка
POVT:
;читать участок файла в буфер
LEA DX,BUF
MOV АН,3FH
MOV CX,160 /размер буфера
INT 21H
MOV AH,AL
LEA SI,BUF
CMP AL,0
;просматриваем буфер и преобразуем латинский шрифт
L02 :
JZ ZER
CMP BYTE PTR [SI],97
JB L01
CMP BYTE PTR [SI],122
JA L01
SUB BYTE PTR [SI],32
L01:
INC SI
DEC AL
JMP SHORT L02
ZER:
PUSH AX
;перемещаем указатель файла назад
MOV AX,4200H
XOR CX,CX
MOV DX,DI /указатель начала считанного участка
INT 21H
; пишем буфер на диск
;количество записанных байт может, вообще говоря,
;быть больше 160
MOV АН,40Н
POP СХ
PUSH СХ
MOV CL,CH
XOR CH,CH
LEA DX,BUF
INT 21H ' .
;проверяем, не достигнут ли конец файла
POP AX
MOV AL,AH
XOR АН,АН
ADD DI,АХ
CMP AL,160 ;сравниваем с размером буфера
JZ POVT
;закрыть файл
MOV АН,ЗЕН
INT 21H
EXIT:
RET
CODE ENDS
END BEGIN

int *asd=new int[3];

//как я понимаю, здесь я создаю новый массив asd с тремя элементами.

int *asd=(int*)malloc(sizeof(int)*3);

//как я понимаю, здесь я также создаю массив с тремя элементами.

asd[n]=111;
//где n любое целое число

int mas[3];
int z;

z = 0;
mas[3] = 1122334;
printf("%i", z);

program laba35;

const
  a : array [0..6] of real = (1, 3.5, 4, -0.8, 1.9, 5, 13);
  c = 2;
  d = 10;

var
  i : integer;
  p : real;

begin
  p := 1;
  for i := 0 to 6 do 
    if ((a[i] >= c) and (a[i] < d)) then
      p := p * a[i];
  writeln ('p = ', p : 0 : 2);
end.

program laba36;

type
  SomeArray = array [0..1, 0..2] of real;

const
  p : SomeArray  = ((-1.5, 9.1, 3.5), (2.7, 3.14, 1.5));
  k = 0;

function getmax (p : SomeArray; k : integer) : real;
var
  i : integer;
  max : real;
begin
  max := p[0][k];
  for i := 1 to 1 do
    if max < p[i][k] then
      max := p[i][k];
  getmax := max;
end;

var
  i, j : integer;
  max : real;
  
begin
  max := getmax (p, k);
  for i := 0 to 1 do
    for j := 0 to 2 do
      p[i][j] := p[i][j] / max;
  for i := 0 to 1 do
    for j := 0 to 2 do
      writeln (p[i][j] : 0 : 2);
end.

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

int main()
{
    char  stroka[300];
    gets (stroka);

    int dlin_min=strlen(stroka); // хранит длинну минимальной строки, пока равна длинне всей строки
    int dlin_max=0; //хранит максимальную длинну строки
    int dlin_tek=0; //хранит текущую длинну строки

    char stroka_min[300]; //строка хранящая минимальное слово
    char stroka_max[300];// строка хранящая максимальное слово
    char stroka_tek[300]; // строка хранящая текущее слово

    for (int i=0; i<strlen(stroka); i++)
    {
 printf ("i= %d\n", i);
        switch (int(stroka [i]))
        {
            case 32  :{
                              if  (dlin_tek>dlin_max) {
                                                                        for (int j=0; j<dlin_tek; j++)
                                                                        {
                                                                        printf ("j= %d\n", j);
                                                                        stroka_max[j]=stroka_tek[j];
                                                                        };
                                                                        dlin_max=dlin_tek;
                                                                        };
                              if (dlin_tek<dlin_min) {
                                                                        for (int j=0; j<dlin_tek; j++)
                                                                        {
                                                                        printf ("j2= %d\n", j);
                                                                        stroka_min[j]=stroka_tek[j];
                                                                        };
                                                                        dlin_min= dlin_tek;
                                                                        };
                              dlin_tek=0;
                              break;
                              }

            default:
            {
                stroka_tek[i]=stroka[i];
                dlin_tek=strlen(stroka_tek);
            };
        };
    };

printf ("minslovo= %s\n", stroka_min);
printf ("maxslovo= %s\n", stroka_max);
    return EXIT_SUCCESS;
}