Абсолютная ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
<u><em>Ответ:</em></u>
b. функциональных информационных систем.
Формальный язык это тот язык который изучают(ноты,английский,Дорожные знаки,С++, и т.д.
Var a:array[1..10] of Integer ;
p,i:integer;
Begin
p:=1;
WriteLn('Массив');
For i:= 1 to 10 do
begin
a[i]:=Random(20)-10;
Write(a[i]:3);
if a[i]<0 then p:=p*a[i];
end;
WriteLn;
WriteLn('Произведение отопительных элементов = ',p)
end.
Sum = 0
while x!= 0:
a = int(input())
if( a % 10 == 3) or (a % 3 == 0):
sum+=1
print(sum)
только я надеюсь вы знаете как оформляется цикл и if. Ибо здесь всё формотируется и все нужные TAB'ы исчезают