Помогите решить пожалуйста!!! Срочно! ПРОШУ

Знания

Информатика

1 ответ:

нолик [7]4 года назад

0 0

1- 159,2-4,3-15,4-1000010,5-100000,6-1011

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

Система команд исполнителя состоит из двух команд: 1. Умножить число на 4. 2. Прибавить к числу 1. Программа для исполнителя зап

Блохер

решение во вложении

Ответ: 48

0 0

3 года назад

Петиной успеваемости за год (по четвертям) для следующих предметов: физика,химия, алгебра, геометрия.Петины оценки:физика – 5 4

kate81995 [171]

Физика-5+4+4+5=18:4=4,5 Химия-3+4+3+4=14:4=3,5 Алгебра-4+4+3+4=15:4=3,75 Геометрия-4+3+3+3=13:4=3,25 Если надо округлять: Физика:5 Химия:4 Алгебра:4 Геометрия:3

0 0

3 года назад

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

КАК ПРИСВОИТЬ ПЕРЕМЕННОЙ МИНИМАЛЬНОЕ ЗНАЧЕНИЕ (ТИП INTEGER)НА ПАСКАЛЕ! СРОЧНО!А ТО ЗАБЫЛ!(МОГУ РЕШАТЬ ПРОГРАММУ ДРУГИМИ (6 СПОСО

Антон Соломатин [7]

В Паскаль минимум определен только для типов single, real и double

0 0

1 год назад

Определить, сколько раз в тексте встречается заданное слово. Написать программу, Паскаль

cristina [21]

Var
s, sl, sc: string;
i, k: integer;

begin
write('Введите текст ');
readln(s);
write('Введите слово ');
readln(sl);
s:=' '+s+' ';
 sl:=' '+sl+' ';
for i := 1 to length(s) - length(sl) + 1 do
begin
 sc := copy(s, i, length(sl));
 if sc = sl then inc(k);
end;
if k = 0 then writeln('Не встречается')
else writeln('Встречается ', k, ' раз');
end.

0 0

4 года назад

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

Помогите плиз 1. Состауить программу которая считывает 2 числа и находит их сумму 2 сосавить программу которая считывает число-

Ex0r [7]

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

№1

begin
Writeln(ReadReal+ReadReal)
end.

Пример
13.5
273.162
286.662

№2

begin
ReadSeqInteger(ReadInteger).Where(t->t.IsOdd).Sum.Println
end.

Пример
6
15 -10 23 0 18 42
38

0 0

4 года назад