блог студента программиста

Задача 3 Глава 11

Пользователь вводит целые числа. Пока он не введёт число большее 15
, в ответ на каждое введённое число выводите сумму этого числа и предыдущего введённого им числа, если же введённое число больше 15, то цикл необходимо завершить, не выводя в ответ сумму.
Первое введенное пользователем число можно сложить с единицей.

Решение:

Задача 8 Глава 10.1

Выведите на экран, все четные числа от 35 до 117 и нечетные числа, лежащие в диапазоне от 45 до 99.

Решение:

Задача 2 Урок 10.0

Пользователь вводит 4 целых числа, выведите на экран не более трех из этих чисел, которые делятся нацело на 4 (т.е. нужно вывести те числа, которые делятся на 4, но не более трех штук).

Решение:

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

Есть программа, где стоит проверка на ввод пользователем числа 1 или числа 5:

Задача 15 Урок 9.1

Есть программа:

В комментах соцсетей пишут, что эти ребята позволяют себе требовать проверок на детекторе лжи

а кто небудь может на простом языке немного расказать о графической панели ? просто очень интересно как она рабоатет.

Where you were with “petitions” when ukrainian nazi-groups were bombing and killing Russian people and children on Donbass territory?

Or when your US government were bombing people in Syria, Somali, Iraq (as usual)?
May be, you just didn’t see info about all these facts in “ALL free media, and all GLOBAL LEADERS” channels?
Or may be your “free” media are too free to stop keep silence in such moments??

Many people in Russia understand real reason of this “peaceful” campaign.

program Project2;
var a,b: integer;

begin
writeln('vvedite pervoe chislo');
readln(a);
writeln('vvedite vtoroe chislo');
readln(b);
if (a > b) then
writeln(12)
else
writeln(888);
readln();
end.

program training;

{$mode objfpc}{$H+}

uses
{$IFDEF UNIX}{$IFDEF UseCThreads}
cthreads,
{$ENDIF}{$ENDIF}
Classes
{ you can add units after this };

begin;
i := readln('luboe hislo');
if i begin;
writeln(i + 7);
end;
if i > 15 then;
end;
end.