Задать вопрос!

Задать вопрос!

Все категории

Maxim Shmorgilov

4 года назад

9

Какого из указ назначение числа X истино выражение (X>1) и (X>2) и (X≠3)?

Информатика

1 ответ:

МилаЯшина4 года назад

0 0

Ответ: г) х=4, т.к. х больше 1,2, но не равен 3

Читайте также

Пятеро одноклассников: Аня, Саша, Лена, Вася и Миша стали победителями олимпиад школьников по истории, математике, информатике,

Viktor2504

Решение в прилагаемой картинке

0 0

4 года назад

Помогите заполнить , плезз

Dmitrij27

108:
txt - notepad++
doc - Microsoft Word
bmp, pdf - Adobe PhotoShop
zip - WinRar

124: 4

0 0

3 года назад

Что такое компьютерная графика ?

акво [63]

Компьютерная графика- моделирование картинки в 3D. Используется при монтаже видио, в фильмах и мультах

0 0

4 года назад

Прочитать ещё 2 ответа

Вывести все числа кратные 5 от -100 до +100.

Ленчик361 [21]

Все числа которые делятся на 5 без остатка в данном случае

<u>+</u> 100 ,95 , 90, 85, 80, 75, 70, 65, 60, 55, 50, 45, 40, 35, 30, 25, 20, 15, 10, 5

0 0

1 год назад

Имеется текст(любой) Определить сколько слов в тексте начинаются со слога "со" Помогите пожалуйста,очень нужно решение,так как з

Олег Педанов [20]

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

// PascalABC.Net 3.2

begin
Write(ReadlnString('->').ToWords.Where(x->x.Left(2)='со').Count)
end.

Пример:
-> Три собаки сосали одну косточку
2

А вот так (примерно, потому что обычно еще хуже) учат писать программы в школе...

var
s:string;
i,n,k,p:integer;
begin
Write('->'); Readln(s);
if Copy(s,1,2)='со' then k:=1 else k:=0;
Delete(s,1,3);
repeat
    i:=Pos(' со',s);
    if i>0 then begin
      Inc(k);
      Delete(s,1,i+3)
      end
until i=0;
Writeln(k)
end.

0 0

4 года назад