Таблица 1
Из 48 получили 12 : 4+8=12
1991= 9+1+9+1 =20 и так же с остальными числами в таблице 1
Таблица 2
Цифра один справа означает скольки значное число . То есть оно однозначное , 2 двухзначное
С таблицей 3 я не смогу помочь (
Во вложении расписано, что будет в памяти после каждой команды.
4 - ((8 - 2) * 10 - 56) = 0
Ответ: В ..................................
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.