Регистрация
криссть111
01.09.2020 23:44
Информатика
Есть ответ 👍

решить В Паскаль АBC
Написать программу, которая определяет,попадает ли точка с заданными координатами в область , закрашенную на картинке .Результат работы вывести в виде текстового сообщения .

123
449
Посмотреть ответы 1

Ответы на вопрос:

GetMaths
GetMaths
4,5(20 оценок)
Pascalabc.net программа считает число нулей стоящих на четных местах в строке, считая первый элемент строки нечетным. var    t : text;     a,k,i : integer;     begin  assign (t,'file.txt');   reset (t);   i : = 0;   k : = 0;     while not eof (t) do    begin      i : = 0;       while not eoln (t) do      begin        read (t,a);         if (a = 0) and (i = 1) then          k : = k +1;         if i = 0 then          i : = 1        else          i : = 0;       end;       readln (t);       end;           close (t);       writeln (k);   end.

Популярно: Информатика