Форма загрузки файла - ОШИБКА Undefined array key

Submitted by Gurgen on Thu, 12/09/2021 - 21:14

Forums:

index.html

<html>
    <head>
        <title>Text field</title>
        <meta charset="UTF-8">
        <meta name="viewport" content="width=device-width, initial-scale=1.0">
    </head>
    <body>
        <h1>Open your file</h1>
        <form enctype="multipart/form-data" method="post" action="phptext.php">
            <input type="file" name="userfile">
            <input type="submit" value="load">
        </form>
    </body>
</html>

phptext.php

Задача 3 урок 14

Submitted by Denisyndi on Thu, 12/09/2021 - 20:05

Forums:

Задача 3 урок 14

Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось).

program zadacha3;
var x: integer;

procedure init(var a: integer);
begin
  writeln('Vvedite chislo');
  readln(a);
end;

begin
  x:=1;
  init(x);
  writeln(x);
  readln();
end.

Задача 2 урок 14

Submitted by Denisyndi on Thu, 12/09/2021 - 19:56

Forums:

Задача 2 урок 14

Напишите процедуру, которая выводит на экран сумму трёх целых чисел.

program zadacha2;
var x, y, z: integer;

procedure summ(a, b, c: integer);
begin
 write(a+b+c);
end;

begin
  readln(x, y, z);
  summ(x, y, z);
  readln();
end.

Задача 1 Урок 14

Submitted by Denisyndi on Thu, 12/09/2021 - 19:52

Forums:

Задача 1 Урок 14

Напишите функцию, которая возвращает сумму трёх целых чисел.

program zadacha1;
var x, y, z: integer;

function summ(a, b, c: integer): integer;
begin
  result:= a+b+c;
end;

begin
  readln(x, y, z);
  writeln(summ(x, y, z));
  readln();
end.

javascript Условное создание поля (свойства) объекта

vedro-compota's picture
Submitted by vedro-compota on Thu, 12/09/2021 - 15:44

Forums:

Напр. так:

let b = {
      message: message,
      ...(data ? { data } : {}),
}

-- создаст поле data, только если объект data не приводится к false

Что думают о QR кодах и принудительной вакцинации (некоторые) жители Воронежа

vedro-compota's picture
Submitted by vedro-compota on Wed, 12/08/2021 - 22:24

Расскажите, пожалуйста, как вы относитесь к QR кодам, почему против?

Ответ: QR коды это очередная невнятная репрессивная мера, здорово понижающая в правах огромное число людей (фактические увольнения с работы, отстранение от учебы, недопуск в спорткомплексы, сегрегация в общественных местах) и, на наш взгляд, крайне слабо связанная с медициной.

----------

Какие действия предпринимаете в вашем городе, чтобы их не ввели? Расскажите про инициативу

Урок 14 задача 4

Submitted by alexander263 on Wed, 12/08/2021 - 18:14

Forums:

Урок 14 задача 4

Составьте программу, которая выводит на экран прямоугольный флаг N×M вида (с чередованием плюсов и минисов в строках):

- - - - - -
+ + + + + +
- - - - - -
+ + + + + +
- - - - - -

-- для вывода очередной строки используйте подпрограмму, принимающую на вход нужные агрументы.

Урок 14 задача 3

Submitted by alexander263 on Wed, 12/08/2021 - 18:13

Forums:

Урок 14 задача 3

Напишите процедуру, которая принимает переменную целого типа по ссылке, просит пользователя ввести значение в консоли и инициализирует переменную этим значением (убедитесь, что в теле программы значение изменилось). 

program project1;
var numb:integer;

procedure output(var res: integer);
begin
    write('Введите число: '); readln(res);
end;

begin
   output(numb);
   writeln('Результат: ', numb);
   readln();
end.

Урок 14 задача 2

Submitted by alexander263 on Wed, 12/08/2021 - 18:12

Forums:

Урок 14 задача 2

Напишите процедуру, которая выводит на экран сумму трёх целых чисел. 

program project1;
var num1,num2,num3,res:integer;

procedure sum(num1,num2,num3:integer);
begin
  res:=num1+num2+num3;
end;

begin
   write('Введите первое число: '); readln(num1);
   write('Введите второе число: '); readln(num2);
   write('Введите третье число: '); readln(num3);
   sum(num1,num2,num3);
   writeln('Результат: ', res);
readln();
end.

Pages

Subscribe to fkn+antitotal RSS