4 года назад

В классе 1111002\% девочек и 11002 мальчиков. Сколько учеников в классе?

Знания

Информатика

1 ответ:

Leo-mix [180]4 года назад

0 0

1111002+11002=1122004

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

Как нарисовать в скретч коло??? ПОЖАЛУЙСТА!!

Serga959

Вот все проверенно!)

Надеюсь что у тебя такой версии скретч.

0 0

4 года назад

Массив из 17 элементов заполнить целыми случайными числами от -15 до 15. Вывести на экран не чётные элементы и их номера

Иван Пластилинов

Const Sz = 100; // Размер массива

var
a: array [1..Sz] of integer;
N: integer; // Количество элементов в массиве
k,i: integer;

begin
N := 17;
for i:=1 to N do
a[i] := Random(30)-15;
for i:=1 to N do
begin
if (a[i] mod 2)<>0 then
writeln (a[i], ' ', i);
end;

end.

0 0

1 год назад

Решить в Паскале Определить содержит ли массив А[1..20] случайное число Х, введеное с клавиатуры.

Елена Умарова [2.7K]

Program 1;
Var a:array[1..20] of integer;
X, i, k: integer;
Begin
Writeln('введите элементы массива') ;
For i:1 to 20 do
Readln(a[i]);
Writeln('введите х=');
Readln(x);
For i:=1 to 20 do
If x=a[i]
Then k:=k+1;
If k>0
Then writeln('да, содержит')
Else writeln('нет, не содержит');
END.

0 0

4 года назад

Помогите пожалуйста, ABC.Net Паскаль. Строки, обработка строк "Дан произвольный текст на русском языке. Написать программу, кото

МашаС [17]

<u>// PascalABC.NET 3.2, сборка 1467 от 02.06.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>

begin
ReadlnString('Вводите:').ToWords.Where(w->(w.Length).IsOdd)
.Where(w->w.Right(2)='ая').Println
end.

0 0

3 года назад

В каких известных вам литературных произведениях имеет место циклическая форма организации действий?

chipNTV [14]

Например, русские сказки :)

while репка не вытащена do

begin

добавить еще одного участника;

тянуть-потянуть;

end;

кричать ('Вытянули репку!!!');

end.

while не встретилась лиса do

begin

катиться-покатиться;

встретить зверя в лесу;

спеть о том, как от бабушки ушёл и от дедушки ушёл;

спеть о том, как от всех предыдущих зверей ушёл;

пообещать и подавно уйти;

покатиться дальше;

end;

попасть лисе на зубок;

end.

0 0

4 года назад

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