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

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

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

Маленькая певица [3]

4 года назад

5

Пределите, что будет напечатано в результате работы следующей программы:

Var s, k: integer; Begin s := 70; for k := 1 to 8 do s := s - 6; write (s); End.

Информатика

1 ответ:

nastyajheka4 года назад

0 0

Будет напечатано число: 22.

Ответ: 22.

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

Бегун в 1й день пробежал 10 км. В каждый день он пробегал на 10% больше.Определить сколько км всего пробежит бегун за 30 дней

Dkoret

Я думаю что 38 км всего

0 0

4 года назад

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

mona15

Алг
нач
цел максимальная, временная, временнаяДляЦикла
максимальная := -2147480000
нц для временнаяДляЦикла от 1 до 5
ввод временная
максимальная := int(max(временная, максимальная))
кц
вывод "Максимальное число: ", максимальная
кон

0 0

4 года назад

Что означает клавша shift+буква

portu [7]

Заглавная буква
.....

0 0

4 года назад

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

Что такое за устройство ввода используемое для управления компьютером во время игры?8 букв

максикон [14]

Джойстик, геймпад, клавиатура зависит от игры

0 0

3 года назад

Помогите пожалуйста, очень срочно! Паскаль: Дан Текст. Слова в тексте разделены одним или несколькими пробелами. Написать програ

Ayami [7]

var
i:integer;
s:string;
const
glas=['Й','У','Е','Ы','А','О','Э','Я','И','Ю'];
beginwrite ('Vvedite predlohenie: ');
readln (s);
i:=1;
while i<=length (s) do
begin
if ((i=1) or (s[i-1]=' ')) and (s[i] in glas) then
begin
while not ((s[i] in ['.',',',';','!','?',':',' '])) and (i<=length (s)) do
begin
write (s[i]);
i:=i+1;
end;
writeln;
end;
i:=i+1;
end;
readln;
end.

0 0

4 года назад