natapova12
15.06.2022 02:59

Нужно дать ПОДРОБНОЕ объяснение каждой строке в программе на Pascal через //. Пример: begin //Запускаем программу
Сама задача:
var year: integer; //Назначаем тип переменной для переменной year
begin //Запускаем программу
write('Введите год: '); //Выводим информацию на экран
readln(year); //Читаем вводимую информацию в переменную year
if year mod 4 = 0 then //..
if year mod 100 = 0 //..
then if year mod 400 <> 0 then write('365 дней') //..
else write('366 дней') //..
else write('366 дней') //..
else write('365 дней'); //..
end. //..

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
alanka280606
16.09.2020 03:56
// F#
[<EntryPoint>]
let main argv =
    let generateTable n m =
        Array2D.init n m (fun i j -> (i+1) * (j+1))
    let printMatrix (matrix:int[,]) =
        printf "    "
        for i = 0 to (Array2D.length1 matrix) - 1 do
            printf "%4d " (i+1)
        printf "\n"
        printf "    "
        for i = 0 to (Array2D.length1 matrix) - 1 do
            printf ""
        printf "\n"
        for j = 0 to (Array2D.length2 matrix) - 1 do
            printf "%2d |" (j+1)
            for i = 0 to (Array2D.length1 matrix) - 1 do
                printf "%4d " matrix.[i, j]
            printf "\n"
        printf "\n"
    let inputArray = generateTable 10 10
    printMatrix inputArray
    System.Console.ReadKey true |> ignore
    0
0,0(0 оценок)
Ответ:
Dasha12541
16.09.2020 03:56
<HTML>
<HEAD>
<SCRIPT>
<!--
function btnClick()
{
 s="";
 for (i=1; i<=9; i++)
  for (j=0; j<=9; j++)
   if (i != j)
    for (k=0; k<=9; k++)
     if ((k != i) && (k != j)) {
      a = i*100+j*10+k;
      s = s+a+" ";
      }
  document.frm.res.value=s;
}
//-->
</SCRIPT>
</HEAD>
<BODY>
<H1>Документ с JavaScript</H1>
<FORM name=frm>
<INPUT type="button" name="bt" value="Щелкни здесь!"
        onClick="btnClick();">
<BR>
Результат:
<BR>
<TEXTAREA name="res" cols="80" rows="35">
</TEXTAREA>
</FORM>
</BODY>
</HTML>
Javascript напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота