uses crt;
const n=3;
var i,s:integer;
k:string;
a:array[1..10] of integer;
begin
repeat
clrscr;
s:=0;
writeln('Задйате стаж работы в анкеты ');
for i:=1 to n do begin
write('Анкета ', i,': '); readln(a[i]);
if a[i]>=5 then inc(s)
end;
writeln('По реузльтатам подходят ', s,' анкеты');
writeln('Повторить - Enter. Выход - любой символ + Enter');
readln(k);
until k<>''
end.
Они злоумышленники. Их цель навредить человеку или какой нибудь компании,нанеся им материальные убытки в виде поломанной техники или обесценивания товара
Ответ: 1) a<17
if (если) условие then (то) действие выполняется, если условие выполняется (истино) else (иначе) действие выполняется, если условие не выполняется (ложно)
Роль информатики в моделировании. Она помогает получить знания об объекте, процессе,явлении с целью получения боллее наглядных,точных знаний.
Можно выделить несколько этапов моделирования
1. Постановка задачи
2. Проанализировать объект моделирования
3. Построить модель
4. Провести компьютерный эксперимент
5. Проанализировать результаты
Изначально i = 4
Проверяем 4<10? Да, значит прибавляем 3 и получаем 7.
Проверяем 7<10? Да, значит прибавляем 3 и получаем 10.
Проверяем 10<10? Нет, значит цикл больше не выполняется.
Ответ: Тело цикла выполнится два раза